如果允许进行筛选,则返回一个 AutoFilter 对象。如果禁止进行筛选,则返回 Nothing。只读。
若要为工作表创建一个 AutoFilter 对象,必须先手动或使用 Range 对象的 AutoFilter 方法启用工作表中某个区域上的自动筛选功能。
下面的示例将变量设置为工作表 Crew 上的筛选区域中第一列的筛选 Criteria1 属性值。
With Worksheets("Crew")
If .AutoFilterMode Then
With .AutoFilter.Filters(1)
If .On Then c1 = .Criteria1
End With
End If
End With