本示例显示工作表 Sheet1 中 AutoFilterMode 属性的当前状态。

If Worksheets("Sheet1").AutoFilterMode Then
isOn = "On"
Else
isOn = "Off"
End If
MsgBox "AutoFilterMode is " & isOn