Verwenden Sie die If Then-Anweisung in Excel VBA Codezeilen auszuführen, wenn eine bestimmte Bedingung erfüllt ist.

Wenn dann Statement

Legen Sie eine Befehlstaste auf dem Arbeitsblatt und fügen Sie die folgenden Codezeilen:

Dim score As Integer, result As String

score = Range("A1").Value

If score >= 60 Then result = "pass"

Range("B1").Value = result

Erläuterung: wenn Punktzahl größer oder gleich 60, übergeben Excel VBA zurückkehrt.

Ergebnis, wenn Sie auf das Befehlsschaltflächen auf dem Blatt klicken:

Excel VBA If Then Statement

Hinweis: Wenn Partitur weniger als 60, Excel VBA stellt den Wert des leeren Variable Ergebnisses in Zelle B1.

Else-Anweisung

Legen Sie eine Befehlstaste auf dem Arbeitsblatt und fügen Sie die folgenden Codezeilen:

Dim score As Integer, result As String

score = Range("A1").Value

If score >= 60 Then

result = "pass"

Else

result = "fail"

End If

Range("B1").Value = result

Erläuterung: wenn Punktzahl größer oder gleich 60, Excel VBA zurückkehrt passieren, sonst Excel VBA kehrt scheitern.

Ergebnis, wenn Sie auf das Befehlsschaltflächen auf dem Blatt klicken:

Excel VBA Else Statement

Hinweis: Nur wenn Sie eine Codezeile nach Dann haben und keine andere Aussage, es erlaubt ist, dann direkt nach einer Codezeile zu platzieren und wegzulassen (auslassen) End If (erstes Beispiel). Andernfalls eine neue Zeile beginnt nach den Worten Then und Else und mit End If (zweiten Beispiel) beenden.