Excel VBA 检查工作表是否设置了自动筛选器-AutoFilter

 本文由日文译成中文。

本文记录了如何在 Excel VBA 中检查工作表是否设置了自动筛选器。

使用 “AutoFilter ”检查是否设置了自动筛选器。

< Sponsored Links >

句法 “AutoFilter”

如果过滤器打开，则返回自动过滤器对象；如果过滤器关闭，则返回 Nothing。只读。

要为工作表创建自动筛选器对象，可手动为工作表中的单元格区域启用自动筛选，或使用 Range 对象的自动筛选方法。

检查是否设置了自动筛选器的示例

如果活动工作表设置了自动筛选器，信息将显示 “Auto-filter Yes”；如果没有，信息将显示 “No auto-filter”。

Sub test()
    Dim reVal As AutoFilter
    Set reVal = ActiveSheet.AutoFilter

    If reVal Is Nothing Then
        MsgBox "No auto-filter"
    Else
        MsgBox "Auto-filter Yes"
    End If
End Sub

有设置

无设置

< Sponsored Links >