Excel VBA Will Not Recognise AutoFilter Is Enabled

[Harry Y]

Excel vba will not recognise that AutoFilter is enabled. However, it works on the initial sheet which the code is run from.

Using code:
If ActiveSheet.AutoFilterMode Then
Option 1
Else
Option 2
End If

I have tried to use vba prior to the above code, to remove and re-add the autofilter on the sheet, but that made no difference (I used "ActiveSheet.Range("Table_Data[#Headers]").AutoFilter").
I have also tried using "If ActiveSheet.AutoFilterMode = True Then" & "If ActiveSheet.AutoFilterMode = False Then" and the code definitely thinks that the filters are not applied.

Has anyone had this issue and knows how to fix it?

 

[starl]

If you're trying to interact with a listobject ("Table_Data[#Headers]") - then you can't use that logic. It doesn't apply to the filtering of listobjects (Tables).
If you want to see if there's anything filtered in the listobject, use sheet.listobject.autofilter.filtermode. This will return True if a filter is apply, False if there is not. You can then use .ShowAllData to clear the filter.
If you're trying to turn off the arrows, then you'll have to select the entire table and use the AutoFilter command.
Tables are their own objects - listobjects. They have their own properties and methods.