HERBERS Excel-Forum - das Archiv

Thema: Autofilter-Kriterium auslesen (wenn nach Farbe gefiltert)

Autofilter-Kriterium auslesen (wenn nach Farbe gefiltert)
Klexy
Moin zusammen, ich hab das Internet leergesucht, aber nix gefunden.

Im Anhang ist eine Musterdatei.
https://www.herber.de/bbs/user/174898.xlsm

Ich kann Spalte D nach dem Wert 3 oder nach grün oder nach lila filtern.

Ich kann danach das Filterkriterium auslesen, wenn ich nach "3" gefiltert hab.
Ich komm aber nicht drauf, wie ich das Kriterium "=RGB(0, 255, 0)" auslesen kann, wenn ich nach grün gefiltert hab.

Warum das alles?
Ich will die hier gezeigte Lösung für das hier gepostete Problem erweitern:
https://www.herber.de/forum/archiv/704to708/707339_Autofilter_deutlicher_darstellen.html
ursprünglich wahrscheinlich von hier:
https://ms-office-forum.net/forum/microsoft-office/microsoft-excel/100459-spalten-in-denen-per-autofilter-gefiltert-wird-farbig-markieren-%C3%A3%C5%93berschrift#post1010715

Kann mir mal jemand auf die Sprünge helfen?

AW: Autofilter-Kriterium auslesen (wenn nach Farbe gefiltert)
Onur
SO mache ich es auch immer, wenn ich etwas nicht genau weiss:
Einfach Makrorecorder einschalten, Aktion durchführen, Makrorecorder ausschalten und sich das Makro ansehen.
Dann siehst du da sowas wie:
ActiveSheet.Range("$A$1:$E$21").AutoFilter Field:=4, Criteria1:=RGB(0, 255, 0), Operator:=xlFilterCellColor
Nicht hilfreich.
Klexy
Und was willst du mir damit sagen?
Hast du dir den VBA-Code in meiner Musterdatei angeschaut?
AW: Nicht hilfreich.
Onur
Warum so agressiv????
Dier Farbe des Filters ist nicht Criteria1 sondern Criteria1.Color
Jetzt war es hilfreich. Danke.
Klexy
Criteria1.Color ist die Lösung.
Das stand aber in deinem ersten Beitrag nicht drin und kommt auch nicht in der Aufzeichnung des Macrorecorders vor, was ich natürlich auch immer mache.

Leider werden viele Sachen vom Macrorecorder nicht mehr (bzw. nicht vollständig) aufgezeichnet, die in früheren Excel-Versionen noch aufgezeichnet wurden, z.B. die Erstellung von bedingten Formatierungen.
AW: Nicht hilfreich.
Onur
Obwoihl du nicht freundlich bist (obwohl DU Hilfe brauchst):

https://www.herber.de/bbs/user/174900.xlsm
Nochmal danke
Klexy
Selbstverständlich bin ich freundlich.
Ich fand es nur seltsam, dass du eine Macrorecorder-Aufzeichnung postest, die mich überhaupt nicht weitergebracht hat und so auch schon in meinem Code vorkommt.

Die Makros aus deiner bearbeiteten Musterdatei sind weit über meine Fragestellung hinaus sehr interessant, z.B. die Enum mit den Operators.
Werde ich mir in den Werkzeugkasten packen.
Gerne !
Onur