vypnutí filtrů při otevření excelu Vyřešeno

[setuB]

Ahoj lidi, potřeboval bych pomoc s jedním problémem. Potřeboval bych vždy při otevření excelu vypnout filtry (v listu filtry) , které tam zůstali z posledního uložení
díky moc za pomoc

[Reklama]

[karel.laska]

Zdravím,
Nazdázek člověče :-),

Nahrál jsem si makro, ve kterém jsem vypnul filtr jednotlivých sloupců. Nahrané jsem vložil do Worksheetu, po otevření a přidal řádek pro přepnutí na danou záložku..
Stačí to takhle?

S pozdravem Karel

[guest]

Modul ThisWorkbook:

Kód: Vybrat vše

Private Sub Workbook_Open()

    Dim wshList As Worksheet

    For Each wshList In Worksheets
        If wshList.FilterMode Then wshList.ShowAllData
    Next wshList

End Sub

[karel.laska]

A i já jsem teď díky Vám chytřejší :-)

[setuB]

díky moc, už to frčí