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

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
Anzeige
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
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige