AutoFilter
语法：expression.AutoFilter
VBA直接输入这个 是在自动筛选和关闭来回切换。
AutoFilter.FilterMode 属性
如果工作表处于自动筛选筛选器模式，则返回 True。 只读 Boolean。表达 一个代表 AutoFilter 对象的变量。
语法：expression.FilterMode
e.g：
Sub ClearFilter()
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets("Sheet1") ' 替换为实际的工作表名称
If ws.AutoFilterMode Then
ws.AutoFilterMode = False ' 清除筛选
End If
End Sub标签：End,Sub,自定义,AutoFilter,ws,筛选 From： https://www.cnblogs.com/YYZYCS/p/17545675.html