vba - 过滤数字字段

Question

我有以下代码:

ActiveSheet.Range("$A$1:$P$201").AutoFilter Field:=5, Criteria1:="=10"* 

当我点击过滤器并在搜索栏中输入 10*我得到所有以 10 开头的结果.使用宏时，这是行不通的。目标是让宏使用我提供的前两个数字进行过滤。

你能帮忙吗？

Answer 1

问题的核心似乎是试图将文本过滤器应用于数字字段。
代替:

ActiveSheet.Range("$A$1:$P$201").AutoFilter Field:=5 ActiveSheet.Range("$A$1:$P$201").AutoFilter Field:=5, Criteria1:="=10"*

只是:

ActiveSheet.Range("$A$1:$P$201").AutoFilter Field:=5, _  
    Criteria1:=">=10000", Operator:=xlAnd, Criteria2:="<=10999"

似乎奏效了。