Worksheetfunction.match
volti
ich benutze in meinen Reports immer gerne die Worksheetfunction.Match, um schnell Suchbegriffe in Bereichen zu suchen. Da die Funktion bei nicht vorhandenen/ nicht gefundenen Suchbegriffen einen Fehler verursacht, mache ich das z.B. so:
on error resume next
gefunden=0
gefunden= WorksheetFunction.Match("Summe Segmente*", SB.Range("$A$1:$A$100"), 0)
IF gefunden>0 then
.......
Funktioniert super.
Jetzt habe ich eine Excelmappe von jemand anderes bekommen, in der ich genauso arbeiten möchte.
Hier wird jedoch immer bei nicht gefundenen Begriffen der Error 1004 rausgegeben, obwohl ich auch hier den Error wie oben überspringe.
Hat jemand 'ne Ahnung, woran das liegen kann? Das nervt nämlich ganz schön und ist mir nicht plausibel.
PS: Derzeit helfe ich mir mit dem Find-Befehl:
Set oGef = SB.Range("$A$1:$A$100").Find("Summe Segment*", LookIn:=xlValues)
If Not oGef Is Nothing Then gefunden =oGef.row
Bin gespannt auf eine mögliche Erklärung....
viele Grüße
Karl-Heinz