Checking if autofilter is on?

[SOS]

Hi there,

From a search of previous posts I found the code:

activesheet.autofiltermode = false

to switch off autofilter is it has been applied. This is good but
would like to cycle round ALL sheet in the workbook and apply that lin
of code.

I tried

Sub Test
For each Sheet in ActiveWorkbook
Sheet.AutofilterMode = False
Next Sheet
End Sub

and also Sheet*s*.AutoFilterMode = False

but neither worked.

Hope somebody can help

TIA

Seamu

 

[Norman Jones]

Hi Seamus,

Sub Test()
Dim sh As Worksheet

For Each sh In ActiveWorkbook.Worksheets
sh.AutoFilterMode = False
Next
End Sub

 

[RB Smissaert]

Sub test()

Dim sh As Worksheet

For Each sh In ActiveWorkbook.Sheets
sh.AutoFilterMode = False
Next

End Sub


RBS

 

[SOS]

Thanks a lot for the prompt replies. Code works a treat.

Seamu