Autofilter unabhängig der Reihenfolge
17.08.2022 18:33:03
Günter
war seit sehr langer Zeit nicht mehr hier, benötige aktuell aber wieder eure Hilfe.
Gibt es eine Möglichkeit in einer Tabelle (A10:P14)
eine Suche per Autofilter durchzuführen, bei der das Ergebnis unabhängig der Reihenfolge der Suchbergriffe aufgelistet wird ?
Aufbau der Tabelle:
In Zeile 10 stehen die Überschriften der Tabelle
Die Suchbegriffe (Teilstrings) werden in Zelle M6 eingegeben (mit * getrennt). Suche nach *bb*cc*
In den Zellen M11:M14 steht
M11 = aa bb dd cc
M12 = dd cc dd aa
M13 = cc dd aa dd
M14 = dd cc aa dd
Mein Makro sieht so aus...
Sub Suche_Bezeichnung()
'suchen mit * vor, zwischen und nach den Suchbegriffen
'aktives Arbeitsblatt
'Bereich M10:M14 . AutoFilter Spalte 13 (Spalte M), Suchekriterium = aktives Arbeitsblatt Zelle M6
ActiveSheet.Select
ActiveSheet.Range("$M$10:$M$14").AutoFilter Field:=13, Criteria1:=ActiveSheet.Range("M6")
'M6 aktivieren
Range("M6").Select
End Sub
Wenn ich aber nach *cc*bb" suche, erhalte ich keinen Treffer, da die Reihenfolge nicht stimmt.
Gibt es eine Möglichkeit, das Makro so anzupassen, damit ich nach Teilstrings unabhänging der Reihenfolge filtern kann,
d.h. auch M11 als Ergebnis gefiltert wird, wenn ich nach *cc*bb* suche?
Hoffe ich habe mich verständlich ausgedrückt und es kann mir jemand weiterhelfen.
Vielen Dank im Voraus.
Günter