在Excel 2010中使用VBA在表格中應用自動過濾器

Question

我有一張價格和產品表。 我要過濾排除價格，如果它是0,00€或返回錯誤字樣。 我做以下事情：

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"