Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

VBA-Begriff: GoTo-Anweisung (Beispiel)

In diesem Beispiel wird die GoTo-Anweisung verwendet, um zu Zeilenmarken innerhalb einer Prozedur zu verzweigen.

Sub GotoAnweisungDemo()
Dim Zahl, Text1
    Zahl = 1     ' Variable initialisieren.
    ' Zahl auswerten und zur entsprechenden Marke verzweigen.
    If Zahl = 1 Then GoTo Zeile1 Else GoTo Zeile2
    
Zeile1:
    Text1 = "Zahl ist gleich 1"
    GoTo LetzteZeile    ' Zu LetzteZeile verzweigen.
Zeile2:
    ' Die nächste Anweisung wird niemals ausgeführt.
    Text1 = "Zahl ist gleich 2"
LetzteZeile: 
    Debug.Print Text1    ' "Zahl ist gleich 1" ' Direkt im Fenster ausgeben.
End Sub