Hoe gebruik ik if met and in excel vba?

U kunt de AND- operator gebruiken met de VBA IF-instructie om meerdere voorwaarden te testen, en als u deze gebruikt, kunt u twee voorwaarden tegelijkertijd testen en waar worden als beide voorwaarden waar zijn. En als een van de voorwaarden onwaar is, retourneert deze onwaar in het resultaat.

Combineer ALS EN

1. Begin eerst de IF-instructie met het trefwoord “IF”.
2. Geef daarna de eerste voorwaarde op die u wilt testen.
3. Gebruik vervolgens het sleutelwoord AND om de tweede voorwaarde op te geven
4. Geef aan het einde de tweede voorwaarde op die u wilt testen.

Laten we een voorbeeld bekijken om het beter te begrijpen.

 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

Als je naar het bovenstaande voorbeeld kijkt, hebben we twee voorwaarden gespecificeerd: één if (1 = 1) en de tweede is (2 > 1) en hier zijn beide voorwaarden waar, en daarom wordt de coderegel uitgevoerd die we hebben opgegeven als het resultaat is waar.

Als een van deze twee voorwaarden niet waar is, laat me dan hier een andere code gebruiken.

 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

In de bovenstaande code is de tweede voorwaarde false (2 < 1) en wanneer u deze macro uitvoert , wordt de coderegel uitgevoerd die we hebben opgegeven als het resultaat false is.

Meerdere voorwaarden met ALS EN

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 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

We hebben nu drie voorwaarden om te testen en we hebben de EN na de tweede voorwaarde gebruikt om de derde voorwaarde te specificeren. Zoals je hierboven hebt geleerd, moeten bij het gebruik van AND alle voorwaarden waar zijn om waar te worden in het resultaat.

Wanneer u deze code uitvoert, wordt de coderegel uitgevoerd die we voor true hebben opgegeven.

En als een van de voorwaarden onwaar is, net zoals u deed in de volgende code, retourneert deze onwaar.

 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