IIf IsNumeric(TextBox1.Value), Goto Start, GoTo Beenden
Private Sub CommandButton1_Click()
If IsNumeric(TextBox1.Value) Then GoTo Teil1 Else: GoTo Teil2
Teil1:
MsgBox "Teil 1"
GoTo Ende
Teil2:
MsgBox "Teil 2"
Ende:
End Sub
Öffne den VBA-Editor in Excel, indem Du ALT + F11 drückst.
Füge ein neues Modul hinzu: Rechtsklick auf "VBAProject (DeinWorkbookName)" > Einfügen > Modul.
Kopiere den folgenden Code in das Modul:
Private Sub CommandButton1_Click()
If IsNumeric(TextBox1.Value) Then GoTo Teil1 Else GoTo Teil2
Teil1:
MsgBox "Teil 1"
GoTo Ende
Teil2:
MsgBox "Teil 2"
Ende:
End SubTeste den Code, indem Du auf den Button klickst und verschiedene Werte in TextBox1 eingibst.
Fehler 1: "TypMismatch" bei der Überprüfung von TextBox1.Value.
TextBox tatsächlich numerisch ist.Fehler 2: GoTo-Anweisung funktioniert nicht.
Teil1, Teil2) korrekt definiert sind.Fehler 3: Fehlende Klammern bei der IIf-Anweisung.
IIf(IsNumeric(TextBox1.Value), "Wert1", "Wert2").Statt GoTo kannst Du auch Select Case verwenden, um die Lesbarkeit des Codes zu verbessern. Hier ein Beispiel:
Private Sub CommandButton1_Click()
Select Case IsNumeric(TextBox1.Value)
Case True
MsgBox "Teil 1"
Case False
MsgBox "Teil 2"
End Select
End SubDiese Methode ist klarer und vermeidet die Verwendung von Sprungmarken, die als unübersichtlich gelten.
Beispiel 1: Einfache IIf-Implementierung
Dim result As String
result = IIf(IsNumeric(TextBox1.Value), "Zahl", "Keine Zahl")
MsgBox resultBeispiel 2: Verwendung von GoTo für Fehlerbehandlung
Private Sub CommandButton1_Click()
On Error GoTo Fehler
' Dein Code
Exit Sub
Fehler:
MsgBox "Ein Fehler ist aufgetreten!"
End SubIf...Then, Select Case oder Schleifen verwendet werden.1. Kann ich IIf mit GoTo kombinieren?
Nein, IIf gibt einen Wert zurück und sollte nicht mit GoTo verwendet werden. Verwende stattdessen If...Then.
2. Wo verwende ich Sprungmarken sinnvoll?
Sprungmarken können in speziellen Fällen wie Fehlerbehandlung oder komplexen Logiken nützlich sein, sollten jedoch sparsam eingesetzt werden.
3. Was ist der Nachteil von GoTo?
GoTo kann den Code unübersichtlich machen und die Nachvollziehbarkeit erschweren. Es ist besser, strukturierte Programmieransätze zu nutzen.
4. Welche Excel-Version benötige ich für VBA?
VBA ist in den meisten modernen Excel-Versionen verfügbar, einschließlich Excel 2010, 2013, 2016, 2019 und Microsoft 365.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen