例:

ActiveSheet.UsedRange.AutoFilter Field:=1, Criteria1:=12345678
ActiveSheet.UsedRange.AutoFilter Field:=1, Criteria1:=1234 & "*"
ActiveSheet.UsedRange.AutoFilter Field:=1, Criteria1:=Array(12345678, 12345679, 12345670, ...)


我的示例标准是从1234开始的八位数值。第一行有效,但是第二和第三行返回空白页。我尝试了后两行的看似无数种变体,但都没有实现。谢谢!

最佳答案

您可以尝试以下变通办法,只要您具有一致的8位数字结构,就可以检查它是否在12340000和12349999的值范围内,如下面的行所示:

ActiveSheet.UsedRange.AutoFilter Field:=1, Criteria1:=">=12340000", Operator:=xlAnd, Criteria2:="<=12349999"

10-04 12:17