VBA .Find mit wildcard
claudia
ich durchsuche über ein VBA-Marco eine Excel-Liste nach einem passenden Kriterium, das jedoch eine Wildkard enthalen muss, da einige Buchstaben aus der Mitte nicht relevant sind.
So nach dem Prinzip:
Set wo=Cells.Find("ALV * EQUITY")
Funktioniert auch, wenn ich den Suchstring dirket im Find-befehl übergebe.
Da es sich jedoch um eine Schleife handelt, mit der ich 1000 Werte suchen muss, habe ich versucht, den Wert zuvor in eine Variable zu schreiben & damit zu suchen:
...
ID = Left(Range("a" & i).Value, InStr(1, Range("a" & i), " ", vbTextCompare)) & "* EQUITY"
Set wo = Cells.Find(What:=ID, LookAt:=xlWhole)
Klappt nicht. kommt immer nur mit Nothing zurück.
Wisst Ihr, wie man es korrekt macht?
Bester Dank,
Claudia