Makro v Excelu - buňka s aktivním filtrem Vyřešeno

[Transmit]

Zdravim,

v tabulce při 30 aktivních sloupcích je místama problém při aktivnosti filtru v jednom/ve více ze sloupců najít o který/které se jedná. Je možný vytvořit makro, který by buňku, ve který se aktivní filtr nachází, vybarvil?

Př.: Mám z předchozího uložení tabulky aktivní filtr, při jejím znovuotevření nemůžu najít ve kterém sloupci je filtr aktivní, po dlouhém přejíždění v tabulce zleva doprava aktivní filtr najdu. Vybarvení buňky s aktivním filtrem by celou věc urychlilo a zpřehlednilo.
Filtry jsou nastaveny v třetím řádku tabulky v prvních 30 sloupcích.

Myslím si, že to spíš nebude možný. Pokud byste někdo přecejenom věděl, jak na to, předem díky.

[Reklama]

[navstevnik]

Tady je odkaz na reseni http://www.dataspectrum.cz/pages/glossary/glossary.htm - Filtr automatický - zobrazení kritérií

[Transmit]

výborný, díky moc.

[Poki]

Pokusil jsem se taky neco vytvorit...

Kód: Vybrat vše

Sub MarkAutoFilter()

Rows(1).Interior.ColorIndex = xlNone

    Dim FilterNum As Long
   
        If ActiveSheet.AutoFilterMode Then
            For FilterNum = 1 To ActiveSheet.AutoFilter.Filters.Count
                If ActiveSheet.AutoFilter.Filters(FilterNum).On Then
                   Cells(1, FilterNum).Interior.ColorIndex = 6
                End If
            Next

        End If

End Sub