Error on auto filter

[Guest]

This should be a quick fix. I want to re-set the autofilter to show all on
workbook open. Problem is when it's already set to show all I get an error
msg.

Private Sub Workbook_Open()
'===============
'reset filter
'===============

Application.ScreenUpdating = False
ActiveSheet.ShowAllData

End Sub

 

[Guest]

Try adding this

on error resume next
ActiveSheet.ShowAllData