自定义筛选AutoFilter

AutoFilter方法

语法：expression.AutoFilter

VBA直接输入这个 是在自动筛选和关闭来回切换。注意表达式是一个范围。

activesheet.autofileter这样是错误的，会提示你报错；应该是：范围.AutoFilter

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

    '这种写法是错误的 因为autofilterMode是一个只读属性