Autofilter mit 4 oder mehr Kriterien

Bild

Betrifft: Autofilter mit 4 oder mehr Kriterien
von: Peter
Geschrieben am: 01.12.2015 14:40:47

Hallo zusammen
Habe diesen Code vom Internet, es sollen vier Filterkriterien (ODER, alle Zeilen die eines der Kriterien enthalten, sollen angezeigt werden) gefiltert werden.
Jedoch funktioniert der Code nicht. Der Filter ist auf Zeile 3, Spalte G. Wenn ich nur ein Filterkriterium schreibe, dann funktionierts.
Kann mir jemand auf die Sprünge helfen?
Vielen Dank schon jetzt für jede Unterstützung.

Sub AutofilterProdukt_Madopar3()
ActiveSheet.Range("A4:R10000").AutoFilter Field:=7, Criteria1:=Array( _
        "*Madopark*", "*Madopar*", "*Prolopa*", "*Restex*"), Operator:=xlFilterValues
End Sub
Viele Grüsse,
Peter

Bild

Betrifft: AW: Autofilter mit 4 oder mehr Kriterien
von: Hajo_Zi
Geschrieben am: 01.12.2015 16:44:52
Hallo Peter,
benutze den Makrorecorder.


Bild

Betrifft: AW: Autofilter mit 4 oder mehr Kriterien
von: Peter
Geschrieben am: 03.12.2015 09:08:03
Hallo Hajo
Danke für Deine Antwort.
Leider kann ich beim Textfilter "Beginnt mit.." nur zwei Werte filtern.
Aus diesem Grund habe ich die Sterne eingefügt.
Gibt es eine Lösung mit 4 Kriterien und mit Textfilter Beginnt mit...?
Das mit den Sternen funktioniert leider nicht. Hast Du eine Idee?
Danke.
Viele Grüsse,
Peter

Bild

Betrifft: geht scheinbar nicht direkt, aber eben so
von: Michael
Geschrieben am: 03.12.2015 23:21:31
Hi zusammen,
wenn man recherchiert, findet man auch
https://www.herber.de/forum/archiv/1280to1284/1281272_VBAAutofilter_mit_Kriteriumsarray.html
Aber auch der dortige Vorschlag mit einem Spezialfilter haut bei mir mit 4x * nicht hin.
Übrigens ist Dein 1. Filterkriterium im 2. enthalten, Du brauchst also eigentlich nur 3.
Warum eigentlich R10000?
Ansonsten sehe ich eigentlich nur ne Hilfsspalte S, die Du entweder entsprechend verformelst oder VBA.
Oder in einem Rutsch: https://www.herber.de/bbs/user/101995.xls
Schöne Grüße,
Michael

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Autofilter mit 4 oder mehr Kriterien"