If activesheet.filtermode then
activesheet.showalldata
End if

--
Regards,
Tom Ogilvy

"CiaraG" wrote in message
...
Does anyone know how to check whether a filter is active
on a worksheet?

I want to ensure that all data is on show before running a
recorded macro. However if I try to "show all data" on a
worksheet where there is no criteria set on a filter I get
an error message.

Any ideas on how to avoid this?

Thanks,

CiaraG