本示例显示当前工作表的筛选状态。

MsgBox ActiveSheet.FilterMode