使用VBA自動過濾器排除兩個數字之間的所有值

Question

對於僅包含數字的一些數據，我想過濾保留數據< -1或> 1。

我已經看到了很多關於排除特定值的主題，但它不匹配，因爲我的值可能是無限的。

我試過這段代碼：

length = Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row 

ThisWorkbook.Sheets("Sheet1").Range("$A$2:$W$" & length).AutoFilter _ 
    Field:=19, _ 
    Criteria1:="<-1", _ 
    Operator:=x1Or, _ 
    Criteria2:=">1" 

但錯誤消息「Range類的自動篩選方法失敗」彈出。我也嘗試過使用x1和運算符，但同樣的問題。

當試圖僅此部分：

length = Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row 

ThisWorkbook.Sheets("Sheet1").Range("$A$2:$W$" & length).AutoFilter _ 
    Field:=19, _ 
    Criteria1:="<-1" 

它完美。所以我想我的「長度」變量或我的範圍沒有問題。

Answer 1

您錯誤輸入了代碼。 x1Or to xlOr