Sub showall()
On Error GoTo away
ActiveSheet.ShowAllData
away:
End Sub

--
Don Guillett
SalesAid Software

"Patty" wrote in message
oups.com...
I would like to creat a "command button" for users of my spreadsheet to
undo all autofilters. Is there a written macro for this?