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

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

Объедините ЕСЛИ И

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

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

 Sub myMacro() If 1 = 1 And 2 > 1 Then MsgBox "Both of the conditions are true." Else MsgBox "Maybe one or both of the conditions are true." End If End Sub

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

Теперь, если какое-либо из этих двух условий неверно, позвольте мне использовать здесь другой код.

 Sub myMacro1() If 1 = 1 And 2 < 1 Then MsgBox "Both of the conditions are true." Else MsgBox "Maybe one or both of the conditions are true." End If End Sub

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

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

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

 Sub myMacro2() If 1 = 1 And 2 > 1 And 1 - 1 = 0 Then MsgBox "All the conditions are true." Else MsgBox "Some conditions are false." End If End Sub

Теперь у нас есть три условия для проверки, и мы использовали оператор «И» после второго условия, чтобы указать третье условие. Как вы узнали выше, при использовании AND все условия должны быть истинными, чтобы результат стал истинным.

Когда вы запускаете этот код, он выполняет строку кода, которую мы указали как true.

И если какое-либо из условий неверно, как в следующем коде, оно возвращает false.

 Sub myMacro3() If 1 = 1 And 2 < 1 And 1 + 1 = 0 Then MsgBox "All the conditions are true." Else MsgBox "Some conditions are false." End If End Sub