Hi Seamus,

Sub Test()
Dim sh As Worksheet

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


---
Regards,
Norman



"SOS " wrote in message
...
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 I
would like to cycle round ALL sheet in the workbook and apply that line
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

Seamus


---
Message posted from http://www.ExcelForum.com/