使用“自动筛选”筛选出一个列表。Variant 类型。
注意 在 Worksheet 对象中应用 AutoFilter 属性,返回一个 AutoFilter 对象。
expression.AutoFilter(Field, Criteria1, Operator, Criteria2, VisibleDropDown)
expression 必需。该表达式返回“应用于”列表中的对象之一。
Field Variant 类型,可选。相对于作为筛选基准字段(从列表左侧开始,最左侧的字段为第一个字段)的偏移量。
Criteria1 Variant 类型,可选。筛选条件(一个字符串;例如,“101”)。使用“=”可搜索到空字段,或者使用“<>”可搜索到非空字段。如果省略该参数,则搜索条件为 All。如果将 Operator 设为 xlTop10Items,Criteria1 则指定数据项个数(例如,“10”)。
Operator XlAutoFilterOperator 类型,可选。
XlAutoFilterOperator 可为以下 lAutoFilterOperator 常量之一。 |
xlAnd default |
xlBottom10Items |
xlBottom10Percent |
xlOr |
xlTop10Items |
xlTop10Percent |
可使用 xlAnd 和 xlOr 将 Criteria1 和 Criteria2 组合成复合筛选条件。 |
Criteria2 Variant 类型,可选。第二筛选条件(一个字符串)。与 Criteria1 和 Operator 组合成复合筛选条件。
VisibleDropDown Variant 类型,可选。如果为 True 则显示筛选字段自动筛选的下拉箭头。如果为 False 则隐藏筛选字段自动筛选的下拉箭头。默认为 True 。
如果忽略全部参数,此方法仅在指定区域切换自动筛选下拉箭头的显示。
本示例从工作表 Sheet1 上的 A1 单元格开始筛选出一个清单,该清单中只显示字段一为字符串“Otis”的数据项。字段一的下拉箭头将被隐藏。
Worksheets("Sheet1").Range("A1").AutoFilter _
field:=1, _
Criteria1:="Otis"
VisibleDropDown:=False