Item Property (Filters Collection) Example
The following example sets a variable to the value of the On property of the filter for the first column in the filtered range on the Crew worksheet.
Set w = Worksheets("Crew")
If w.AutoFilterMode Then
filterIsOn = w.AutoFilter.Filters.Item(1).On
End If