Hi

Code required to run ShowAllData on every sheet in every open workbook,
leaving filter buttons/arrows in place.

Something like:

With all Workbooks and all Sheets

If .FilterMode Then
.ShowAllData
End If
End With

TIA

--
Thank you

Regards
Aussie Bob C.
Using Windows XP Home + Office 2003 Pro