Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: Посетитель от 12 января 2021, 02:12

Название: Excel VBA Макросы. Почему не работает код при использовании If ... End If?
Отправлено: Посетитель от 12 января 2021, 02:12
Подскажите, почему происходит ошибка в этом коде:?
If Range("A1").Value > Range("B1").Value Then Range("C1").Interior.Color = vbGreen
End If
Название: Re: Excel VBA Макросы. Почему не работает код при использовании If ... End If?
Отправлено: Администратор от 12 января 2021, 09:02
If ... Then можно писать двумя способами.

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

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

Вы используете первый способ - в одну строку. Поэтому не нужно использовать End If.
Название: Re: Excel VBA Макросы. Почему не работает код при использовании If ... End If?
Отправлено: Посетитель от 12 января 2021, 09:36
спасибо