在Excel 2010中使用VBA在表中应用自动筛选器

Question

我有一张价格和产品的桌子。我想通过排除价格来过滤，如果它是0,00€或如果它返回单词ERROR。我做以下事情：

Set tbl = Worksheets("FOR EXPORT").ListObjects("Table1")
'SET AUTOFILTER
tbl.Range.AutoFilter Field:=3, Criteria1:="<>*ERROR*", Operator:=xlOr, Criteria2:="<>0"

没有任何过滤，标准1或标准2都没有

我测试了Criteria2：=“<> 0,00€”以及相同的结果。

Answer 1

主要问题是你需要一个AND运算符，而不是OR。世界上的一切都满足其中一个条件 - 或 - 所以什么都不会被过滤掉。您也不会包含欧元符号等格式，除非这是一列文本。 ：

Field:=3, Criteria1:= "<>*Error*", Operator:=xlAnd, Criteria2:="<>0"