Если ошибка оператор =

Question

У меня есть этот макрос:

Sub fixComma() 
' 
' fixComma Macro 
' 
' 
' If (Selection.Start != Selection.End) Then 
    Selection.Find.ClearFormatting 
    Selection.Find.Replacement.ClearFormatting 
    Selection.Find.Replacement.LanguageID = wdEnglishUS 
    With Selection.Find 
     .Text = "([0-9]).([0-9])" 
     .Replacement.Text = "\1,\2" 
     .Forward = True 
     .Wrap = wdFindAsk 
     .Format = True 
     .MatchCase = False 
     .MatchWholeWord = False 
     .MatchKashida = False 
     .MatchDiacritics = False 
     .MatchAlefHamza = False 
     .MatchControl = False 
     .MatchByte = False 
     .MatchAllWordForms = False 
     .MatchSoundsLike = False 
     .MatchWildcards = True 
    End With 

    Selection.Find.Execute Replace:=wdReplaceAll 
    ' Else 
    ' MsgBox "Nothing is selected, Macro terminated" 
    ' End If 
End Sub 

Если я раскомментировать if-то еще заявления, которые я получаю следующее сообщение об ошибке:

Compile Error: 
type declaration character does not match declared data type 

Макрос был записан и я добавил, если чтобы пользователь не применял его, не выбирая текст.

Answer 1

Вы вводите в заблуждение синтаксис VBA с другим языком, например, javascript? VBA использует <> как не равный оператору. != используется javascript и некоторыми другими языками языка C.

If Selection.Start <> Selection.End Then