Excel VBA Макросы. Почему не работает код при использовании If ... End If?

[Посетитель]

Подскажите, почему происходит ошибка в этом коде:?
If Range("A1").Value > Range("B1").Value Then Range("C1").Interior.Color = vbGreen
End If

[Администратор]

If ... Then можно писать двумя способами.

Способ 1. В одну строку:
If ... Then действие

Способ 2. В три строки:
If ... Then
    действие
End If

Вы используете первый способ - в одну строку. Поэтому не нужно использовать End If.

[Посетитель]

спасибо