本示例显示活动工作簿sheet1中第一列自动筛选的状态值。
MsgBox ActiveWorkbook.Worksheets(1).AutoFilter.Filters(1).On