自定义筛选AutoFilter

发布时间 2023-07-11 18:55:43作者: iZJ"Qq4577105

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