Reset All Auto Filters for All Worksheets

[jason_kelly]

Hi There,

I need your help.

I would like to, at the click of a button,

to reset all auto filters to "All" accross all of my worksheets (Sheet1 and Sheet2) in Excel

How can this be done?

Any help with this is greatly appreciated.

Much thanks for all your help in advance,

Cheers

Jay.

[romperstomper]

For example:

Sub ShowAll()
    Dim wks As Worksheet
    For Each wks In ActiveWorkbook.Worksheets
        With wks
            If .AutoFilterMode Then
                If .FilterMode Then .ShowAllData
            End If
        End With
    Next wks
End Sub

[jason_kelly]

Thanks so much for the help Rompers.

Works great!

Cheers,

Jay

[romperstomper]

Glad to help - please don't forget to mark your thread as Solved.

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save