Как использовать если с или в vba?

Вы можете использовать оператор OR с оператором VBA IF для проверки нескольких условий. Когда вы его используете, он позволяет вам одновременно проверять два или более условий и возвращает true, если какое-либо из этих условий истинно . Но если все условия ложны, то в результате возвращается false.

Использование OR с ЕСЛИ

1. Сначала начните оператор IF с ключевого слова «IF».
2. После этого укажите первое условие, которое вы хотите проверить.
3. Затем используйте ключевое слово OR, чтобы указать второе условие.
4. В конце укажите второе условие, которое вы хотите проверить.

Чтобы лучше понять, давайте рассмотрим пример.

 Sub myMacro() 'two conditions to test using OR If 1 = 1 Or 2 < 1 Then MsgBox "One of the conditions is true." Else MsgBox "None of the conditions are true." End If End Sub

Если вы посмотрите на пример выше, мы указали два условия: одно if (1 = 1) и второе (2 < 1), и здесь только первое условие истинно, и даже если оно выполнило строку кода, которую мы указывается, если результат верен.

Теперь давайте проверим, являются ли оба условия ложными. Позвольте мне использовать здесь другой код.

 Sub myMacro() 'two conditions to test using OR If 1 = 2 Or 2 < 1 Then MsgBox "One of the conditions is true." Else MsgBox "None of the conditions are true." End If End Sub

В приведенном выше коде оба условия являются ложными, и когда вы запускаете этот код , он выполняет указанную нами строку кода, если результат ложный.

Множественные условия с ЕСЛИ ИЛИ

Аналогичным образом вы также можете тестировать более двух условий одновременно. Давайте продолжим приведенный выше пример и добавим к нему третье условие.

 Sub myMacro() 'three conditions to test using OR If 1 = 1 And 2 > 1 And 1 - 1 = 0 Then MsgBox "one of the conditions is true." Else MsgBox "none of the conditions are true." End If End Sub

Теперь у нас есть три условия для проверки, и мы использовали оператор OR после второго условия, чтобы указать третье условие. Как вы узнали выше, когда вы используете OR, одно из условий должно быть истинным, чтобы результат стал истинным. Когда вы запускаете этот код, он выполняет строку кода, которую мы указали как true.

И если все условия ложны, как в следующем коде, он возвращает false.

 Sub myMacro() 'three conditions to test using OR If 1 < 1 And 2 < 1 And 1 + 1 = 0 Then MsgBox "one of the conditions is true." Else MsgBox "none of the conditions are true." End If End Sub