VBA mit Select Case und Like in Excel
Schritt-für-Schritt-Anleitung
Um die Select Case-Anweisung mit der Like-Funktion in VBA zu nutzen, folge diesen Schritten:
- Öffne den VBA-Editor: Drücke
ALT + F11 in Excel.
- Füge einen neuen Code hinzu: Gehe zu dem Arbeitsblatt, wo du den Code verwenden möchtest.
- Erstelle die
Worksheet_Change-Prozedur:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$7" Then
Select Case True
Case Target = ""
Application.Run "Makro1"
Case Target = "M1"
Application.Run "M1"
Case Target Like "Auto*"
Application.Run "Auto"
End Select
End If
End Sub
- Teste den Code: Ändere den Wert in Zelle D7 und beobachte, ob das entsprechende Makro ausgeführt wird.
Häufige Fehler und Lösungen
-
Fehler: Kein Makro wird ausgeführt
Lösung: Stelle sicher, dass dein Dropdown in Zelle D7 korrekt konfiguriert ist und das Worksheet_Change-Ereignis aktiv ist.
-
Fehler: Select Case wird nicht erkannt
Lösung: Prüfe, ob du Select Case mit True verwendest, um die Like-Funktion zu nutzen.
Alternative Methoden
Anstelle von Select Case kannst du auch If...Then...ElseIf verwenden:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$7" Then
If Target = "" Then
Application.Run "Makro1"
ElseIf Target = "M1" Then
Application.Run "M1"
ElseIf Target Like "Auto*" Then
Application.Run "Auto"
End If
End If
End Sub
Diese Methode ist ebenfalls effektiv, erfordert jedoch mehr Codezeilen.
Praktische Beispiele
Hier sind einige praktische Beispiele für die Verwendung von Select Case und Like in VBA:
-
Für verschiedene Auto-Kategorien:
Case Target Like "Auto*"
Application.Run "Auto"
-
Für andere spezifische Werte:
Case Target Like "M*"
Application.Run "M_Gruppe"
Diese Beispiele zeigen, wie flexibel die Like-Funktion in Verbindung mit Select Case ist.
Tipps für Profis
- Nutze
Select Case anstelle von mehreren If-Bedingungen, um den Code übersichtlicher zu gestalten.
- Verwende
Like, um Muster zu erkennen, was besonders nützlich ist, wenn die Werte ähnlich beginnen (z. B. Auto1, Auto2).
- Wenn du oft mit mehreren Bedingungen arbeitest, ziehe in Betracht, die
Case Is-Anweisung für Vergleiche zu verwenden.
FAQ: Häufige Fragen
1. Kann ich Select Case mit mehreren Bedingungen verwenden?
Ja, du kannst mehrere Bedingungen in einer Select Case verwenden, indem du Case-Anweisungen kombinierst.
2. Wie funktioniert die Like-Funktion?
Die Like-Funktion vergleicht einen Ausdruck mit einem Muster, wobei Wildcards wie * für beliebige Zeichenfolgen verwendet werden können.
3. Welche Excel-Version benötige ich für diese VBA-Funktionen?
Die beschriebenen Funktionen sind in den meisten modernen Excel-Versionen, einschließlich Excel 2010 und höher, verfügbar.