Feld für Autofilter markieren

[Calafati]

Hallo zusammen,

gibt es eine Funktion, die die komplette Zelle, in der der Autofilter-Marker (also Pfeil, Trichter o.ä.) steht, einfärben kann? Wir arbeiten teilweise mit Tabellen mit "Zoom-Faktor" bzw. kleinem Maßstab, in der häufig nur schwer zu erkennen ist, was dieses graue Pull-Down-Feld gerade anzeigt.

Eine Markierung der kompletten Zelle (bspw. gelber Hintergrund) würde hier deutlich weiterhelfen.

Besten Dank vorab für guten Ansatz bzw. Lösung.

UND EIN SCHÖNES WOCHENENDE!
VG
Klaus

[WillWissen]

Hi Klaus,

bin mir jetzt nicht ganz sicher, ob ich dich richtig verstehe.   Markiere halt deine Überschriftszeile und formatiere sie nach deinem Belieben.

[Guschti]

Hallo Klaus

Siehe mal hier: von: Coach
http://www.herber.de/forum/archiv/848to8...v_ist.html

Mfg Guschti

[Kuwer]

Hallo Klaus,

folgender Code kommt in ein normales VBA-Modul (Einfügen - Modul):

Public Function AF_IST_AN(Bereich As Range) As Boolean
'Als Bezug dient eine Zelle der entsprechenden Spalte: AF_KRIT(A2)
 With Bereich.Parent
   If .AutoFilterMode Then
     With .AutoFilter
        AF_IST_AN = .Filters(Bereich.Column - .Range.Column + 1).On
     End With
   End If
 End With
End Function

Nun markierst Du die 1. Zeile des Autofilterbereiches und erstellst eine Benutzerdefinierte Formatierung mit folgender Formel:
=AF_IST_AN(A$2)
(wenn Spalte A die erste Spalte des AF-Bereiches ist).

Gruß Uwe