Comment utiliser IF avec OR en VBA ?

Vous pouvez utiliser l’opérateur OR avec l’ instruction VBA IF pour tester plusieurs conditions. Lorsque vous l’utilisez, il vous permet de tester deux conditions ou plus simultanément et renvoie true si l’une de ces conditions est true . Mais si toutes les conditions sont fausses seulement, il renvoie faux dans le résultat.

Utiliser OU avec SI

1. Tout d’abord, commencez l’instruction IF avec le mot-clé « IF ».
2. Après cela, spécifiez la première condition que vous souhaitez tester.
3. Ensuite, utilisez le mot-clé OR pour spécifier la seconde condition.
4. À la fin, spécifiez la deuxième condition que vous souhaitez tester.

Pour mieux comprendre, voyons un exemple.

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

Si vous regardez l’exemple ci-dessus, nous avons spécifié deux conditions une si (1 = 1) et la seconde est (2 < 1), et ici seule la première condition est vraie, et même si elle a exécuté la ligne de code qui nous avons précisé si le résultat est vrai.

Voyons maintenant si les deux conditions sont fausses, laissez-moi utiliser un code différent ici.

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

Dans le code ci-dessus, les deux conditions sont fausses, et lorsque vous exécutez ce code , il exécute la ligne de code que nous avons spécifiée si le résultat est faux.

Conditions multiples avec IF OR

De la même manière, vous pouvez également tester plus de deux conditions en même temps. Continuons l’exemple ci-dessus et ajoutons-y la troisième condition.

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

Nous avons maintenant trois conditions à tester et nous avons utilisé le OU après la deuxième condition pour spécifier la troisième condition. Comme vous l’avez appris ci-dessus, lorsque vous utilisez OU, l’une des conditions doit être vraie pour devenir vraie dans le résultat. Lorsque vous exécutez ce code, il exécute la ligne de code que nous avons spécifiée pour le true.

Et si toutes les conditions sont fausses, comme vous l’avez fait dans le code suivant, il renvoie faux.

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