Multifilter für (mind) 3 Begriffe
21.02.2019 09:46:03
Werner
bei mir gibt es schon wieder ein Problem:
Ich lade mir den Inhalt einer Report-File in ein (neues) Tabellenblatt. Zeile 1 reserviere ich für die Überschrift. Die Daten aus dem Report sind dann ab Zeile 2.
Nun möchte ich mit einem Filter Zeilen mit bestimmten Begriffen ausfiltern; derzeit sind es 3 Begriffe.
Im Internet habe ich dazu mehrere Beispiele gefunden, aber keines funktioniert.
Ich habe folgenden Code zum Testen zusammengestellt:
Sub Multifilter()
Cells(1, 1).Value = "Überschrift"
Cells(2, 1).Value = "Karlheinz"
Cells(3, 1).Value = "Hans-Dieter"
Cells(4, 1).Value = "Eva-Maria"
Cells(5, 1).Value = "Heinz-Wilhelm"
Cells(6, 1).Value = "Wilhelm"
Cells(7, 1).Value = "Otto"
Range(Cells(1, 1), Cells(7, 1)).AutoFilter _
Field:=1, Criteria1:=Array("Karl*", "*er*", "*o"), Operator:=xlOr
End Sub
Was mir mit obigen Code angezeigt wird, ist "nur" die Zeile mit "Otto". Vertausche ich den 2. und den 3. Filter-Begriff, so wird mir "nur" "Hans-Dieter" angezeigt. Auch mit der Option "XlAnd" erhalte ich kein anderes Ergebnis.
Frage: was ist an meinem Code falsch?
Ich habe Excel 2019 im Einsatz!
Danke im Voraus und Gruß
Werner