Vba: verwenden sie if or, um mehrere bedingungen zu testen

Sie können die folgende grundlegende Syntax in VBA mit IF und OR verwenden, um zu testen, ob mehrere Bedingungen erfüllt sind:

 Sub IfOrTest()
    If Range(" A2 ") = "Warriors" Or Range(" B2 ") > 100 Then
    Range(" C2 ").Value = " Yes! "
    Else
    Range(" C2 ").Value = " No. "
   End If
End Sub

In diesem speziellen Beispiel wird überprüft, ob der Wert in Zelle A2 gleich „Warriors“ ist oder ob der Wert in Zelle B2 größer als 100 ist.

Wenn eine der beiden Bedingungen erfüllt ist, wird der Wert „Ja!“ angezeigt. » wird in Zelle C2 zurückgegeben.

Ansonsten der Wert „Nein“. wird an Zelle C2 zurückgegeben.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Verwandte Themen: VBA: Verwenden Sie IF AND, um mehrere Bedingungen zu testen

Beispiel: Verwenden Sie IF AND, um mehrere Bedingungen in VBA zu testen

Angenommen, wir haben die folgenden Daten in Excel:

Angenommen, wir möchten feststellen, ob der Teamname Warriors lautet oder ob der Punktewert größer als 100 ist, und das Ergebnis in Zelle C2 zurückgeben.

Dazu können wir das folgende Makro erstellen:

 Sub IfOrTest()
    If Range(" A2 ") = "Warriors" Or Range(" B2 ") > 100 Then
    Range(" C2 ").Value = " Yes! "
    Else
    Range(" C2 ").Value = " No. "
   End If
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Das Makro gibt korrekt den Wert „Ja!“ zurück. » in Zelle C2 , da mindestens eine der Bedingungen erfüllt war.

Wenn wir den Wert der Punkte in Zelle A2 ändern und dann das Makro erneut ausführen, prüft es, ob beide Bedingungen für die neuen Werte erfüllt sind:

Nehmen wir zum Beispiel an, wir ändern den Teamnamen in „Rockets“ und führen das Makro erneut aus:

Das Makro gibt korrekt den Wert „Nein“ zurück. in Zelle C2 , da keine der beiden Bedingungen erfüllt war.

Wenn Sie die Ergebnisse stattdessen in einem Meldungsfeld anzeigen möchten, können Sie die folgende Syntax verwenden:

 Sub IfOrTest()
    If Range(" A2 ") = "Warriors" Or Range(" B2 ") > 100 Then
    MsgBox “ Yes! ”
    Else
    MsgBox “ No. ”
   End If
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Das Meldungsfeld gibt „Nein“ zurück. da keine der beiden Bedingungen erfüllt war.

Hinweis : In diesem Beispiel haben wir den Or- Operator nur einmal in unserem Makro verwendet, um zu testen, ob zwei Bedingungen erfüllt sind. Sie können jedoch so viele Or- Operatoren verwenden, wie Sie möchten, um zu testen, ob mehr als zwei Bedingungen erfüllt sind.

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

VBA: So verwenden Sie VLOOKUP
VBA: So zählen Sie das Vorkommen von Zeichen in einer Zeichenfolge
VBA: So überprüfen Sie, ob eine Zeichenfolge eine andere Zeichenfolge enthält