Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Wildcard in VBA?

Forumthread: Wildcard in VBA?

Wildcard in VBA?
07.05.2003 12:55:37
Julia
Mahlzeit!
Gibt es in VBA ein Wildcardzeichen, wie etwa"*"?
Damit man in etwa so was abfragen kann?
ActiveCell.Value="*X*"
Danke

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Wildcard in VBA?
07.05.2003 13:21:55
Andreas Walter

Nutz mal INSTR

IF INSTR(1 ,activecell.value,"X",1)>0 then ...

oder ähnliches - siehe Hilfe

Re: Wildcard in VBA?
07.05.2003 13:55:41
ChrisL

Hallo Julia

Oder mit "Like"

If ActiveCell Like "*X*" Then...

Gruss
Chris

Re: Wildcard in VBA?
07.05.2003 13:57:33
Julia

Danke, genau soetwas wollte ich.

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Infobox / Tutorial

Wildcard in VBA verwenden


Schritt-für-Schritt-Anleitung

Um Wildcards in VBA zu verwenden, kannst du die folgenden Schritte befolgen:

  1. Öffne den VBA-Editor: Drücke ALT + F11 in Excel.
  2. Füge ein Modul hinzu: Klicke mit der rechten Maustaste auf "VBAProject (DeinWorkbookName)" -> "Einfügen" -> "Modul".
  3. Verwende die Like-Anweisung: Um zu prüfen, ob eine Zelle ein bestimmtes Muster enthält. Beispiel:
    If ActiveCell Like "*X*" Then
       ' Deine Aktionen hier
    End If
  4. Alternativ die INSTR-Funktion nutzen: Diese ist hilfreich, um die Position eines Zeichens zu finden. Beispiel:
    If InStr(1, ActiveCell.Value, "X", vbTextCompare) > 0 Then
       ' Deine Aktionen hier
    End If

Häufige Fehler und Lösungen

  • Fehler: "Typ nicht korrekt"
    Lösung: Stelle sicher, dass du den richtigen Datentyp verwendest. Wildcards funktionieren nur mit Strings.

  • Fehler: "Keine Übereinstimmung gefunden"
    Lösung: Überprüfe das Muster. Stelle sicher, dass das Wildcard-Zeichen korrekt verwendet wird, z.B. * für beliebige Zeichen.


Alternative Methoden

Neben der Verwendung von Like und INSTR kannst du auch die Find-Methode verwenden, um nach Werten in einem Bereich zu suchen. Hier ein Beispiel:

Dim rng As Range
Set rng = ActiveSheet.Range("A1:A10")
Set foundCell = rng.Find(What:="*X*", LookIn:=xlValues)

If Not foundCell Is Nothing Then
    MsgBox "Wert gefunden in: " & foundCell.Address
End If

Praktische Beispiele

Hier sind einige praktische Beispiele, um Wildcards in Excel VBA zu nutzen:

  • Suche nach einem Teilstring:

    If ActiveCell.Value Like "*abc*" Then
       MsgBox "Enthält 'abc'"
    End If
  • Mehrere Bedingungen mit Wildcards:

    If ActiveCell.Value Like "*X*" And ActiveCell.Value Like "*Y*" Then
       MsgBox "Enthält sowohl 'X' als auch 'Y'"
    End If

Tipps für Profis

  • Verwendung von vbTextCompare: Nutze diesen Parameter in der INSTR-Funktion, um die Groß-/Kleinschreibung zu ignorieren.

  • Wildcard in Strings: Wenn du Wildcards in VBA-Strings verwendest, achte darauf, dass du die richtigen Zeichen für die Wildcards nutzt (z.B. * für beliebige Zeichen und ? für ein einzelnes Zeichen).

  • Debugging: Verwende Debug.Print, um den Wert von Variablen während der Ausführung zu überprüfen. Das hilft, Fehler frühzeitig zu erkennen.


FAQ: Häufige Fragen

1. Was sind Wildcards in VBA?
Wildcards sind Platzhalterzeichen, die in Strings verwendet werden, um Muster zu definieren. In VBA sind die häufigsten Wildcards * (beliebige Zeichen) und ? (ein einzelnes Zeichen).

2. Wie kann ich Wildcards in einer Schleife verwenden?
Du kannst Wildcards in einer Schleife verwenden, indem du die Like-Anweisung oder INSTR innerhalb der Schleife anwendest, um jeden Wert zu überprüfen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige