Hoe gebruik ik if met or in vba?
U kunt de OR- operator gebruiken met de VBA IF-instructie om meerdere voorwaarden te testen. Wanneer u het gebruikt, kunt u twee of meer voorwaarden tegelijkertijd testen en wordt true geretourneerd als een van deze voorwaarden waar is . Maar als alle voorwaarden alleen onwaar zijn, wordt in het resultaat onwaar geretourneerd.
OR gebruiken met IF
- Begin eerst de IF-instructie met het trefwoord “IF”.
- Geef daarna de eerste voorwaarde op die u wilt testen.
- Gebruik vervolgens het trefwoord OR om de tweede voorwaarde op te geven.
- Geef aan het einde de tweede voorwaarde op die u wilt testen.
Laten we een voorbeeld bekijken om het beter te begrijpen.
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
Als je naar het bovenstaande voorbeeld kijkt, hebben we twee voorwaarden gespecificeerd, één als (1 = 1) en de tweede is (2 < 1), en hier is alleen de eerste voorwaarde waar, en zelfs als deze de coderegel uitvoert die we opgegeven als het resultaat waar is.
Laten we nu eens kijken of beide voorwaarden onwaar zijn. Laat me hier een andere code gebruiken.
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
In de bovenstaande code zijn beide voorwaarden false, en wanneer u deze code uitvoert , wordt de coderegel uitgevoerd die we hebben opgegeven als het resultaat false is.
Meerdere voorwaarden met ALS OF
Op dezelfde manier kunt u ook meer dan twee voorwaarden tegelijkertijd testen. Laten we doorgaan met het bovenstaande voorbeeld en er de derde voorwaarde aan toevoegen.
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
We hebben nu drie voorwaarden om te testen en we hebben de OR na de tweede voorwaarde gebruikt om de derde voorwaarde te specificeren. Zoals je hierboven hebt geleerd, moet een van de voorwaarden waar zijn als je OR gebruikt, waar zijn in het resultaat. Wanneer u deze code uitvoert, wordt de coderegel uitgevoerd die we voor true hebben opgegeven.
En als alle voorwaarden onwaar zijn, zoals u deed in de volgende code, retourneert het onwaar.
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