I am working with tables in excel and I want to remove all filter that has been set in any of my 52 columns, remove bold, colors etc(back to normal formatting).
Somehow my code does not do this, any idea where the issue might be?
'Clears filters on the activesheet. Will not clear filters if the sheet is protected.
On Error Resume Next
If ActiveWorkbook.ActiveSheet.FilterMode Or ActiveWorkbook.ActiveSheet.AutoFilterMode Then
ActiveWorkbook.ActiveSheet.ShowAllData
End If
'in case the sheet is protected
ActiveWorkbook.Sheets("List").Cells.EntireColumn.Hidden = False