/ / Excel VBA Wenn Then-Anweisung

Excel VBA Wenn Then-Anweisung

Wenn Then-Anweisung | Else-Erklärung

Benutze die Wenn Then-Anweisung im Excel VBA Codezeilen auszuführen, wenn eine bestimmte Bedingung erfüllt ist.

Wenn Then-Anweisung

Fügen Sie eine Befehlsschaltfläche in Ihrem Arbeitsblatt ein, und fügen Sie die folgenden Codezeilen hinzu:

Dim score As Integer, result As String
score = Range("A1").Value

If score >= 60 Then result = "pass"

Range("B1").Value = result

Erläuterung: Wenn die Punktzahl größer oder gleich 60 ist, gibt Excel VBA den Pass zurück.

Ergebnis, wenn Sie auf die Befehlsschaltfläche auf dem Blatt klicken:

Excel VBA Wenn Then-Anweisung

Hinweis: Wenn die Punktzahl kleiner als 60 ist, legt Excel VBA den Wert des Ergebnisses der leeren Variablen in die Zelle B1.

Else-Erklärung

Fügen Sie eine Befehlsschaltfläche in Ihrem Arbeitsblatt ein, und fügen Sie die folgenden Codezeilen hinzu:

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 die Punktzahl größer oder gleich 60 ist, gibt Excel VBA den Wert "pass" zurück, andernfalls schlägt Excel VBA zurück.

Ergebnis, wenn Sie auf die Befehlsschaltfläche auf dem Blatt klicken:

Excel VBA Else-Anweisung

Hinweis: Nur wenn Sie nach der Then und no Else Anweisung eine Codezeile haben, dürfen Sie eine Codezeile direkt hinter Then platzieren und If (low out) If (erstes Beispiel) auslassen. Ansonsten starte eine neue Zeile nach den Wörtern Then und Else und beende mit End If (zweites Beispiel).

Lesen Sie auch: