Excel VBA If Then Statement
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:
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:
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.