vba - Excel 自动过滤除变量值之外的所有值

Question

所以我需要过滤一行中除一个之外的所有值。我使用这部分代码让它工作，显然它会过滤除“比利时”之外的所有内容，但我需要变量。

Dim myValue As Variant
myValue = InputBox("Which country to exclude? ")

Range("AB1").Select
ActiveSheet.Range("$B$1:$BY$319696").AutoFilter Field:=27, Criteria1:="<>Belgium"

对于我在特定国家/地区进行过滤的过滤器版本，该变量工作得很好:

Dim myValue As Variant
myValue = InputBox("Which country to filter on: ")

Range("AB1").Select
ActiveSheet.Range("$B$1:$BY$319696").AutoFilter Field:=27, Criteria1:= _
    myValue
ActiveWindow.SmallScroll Down:=-30

那么为什么这不起作用:

ActiveSheet.Range("$B$1:$BY$319696").AutoFilter Field:=27, Criteria1:= <>myValue

另外我不知道为什么它是这样的结构，它是从 Record Macro 生成的，尤其是 _ 标准1:= _
我的值

Answer 1

“<>”不是一个运算符(这就是您在“不工作”示例中尝试使用它的方式)，而是需要成为您传递给自动过滤器的字符串的一部分(这就是您如何在“不工作”示例中使用它的方式)您在第一个工作示例中做到了。)

ActiveSheet.Range("$B$1:$BY$319696").AutoFilter Field:=27, Criteria1:= "<>" & myValue应该可以。