如何将“应用过滤器”应用于工作表的3个不同的列

Question

我必须将过滤器应用于工作表的J，F和AE列，但是当我运行代码时，所有过滤器都被取消选择。

这是我的代码：

Worksheet("sheet").Range("J:J").AutoFilter _
      Field:=1,
      Critical1:="Fruits",_
      VisibleDropDown:=True, 
Worksheet("sheet").Range("F:F").AutoFilter _
      Field:=1,
      Critical1:="Doll",_
      VisibleDropDown:=True,

Answer 1

赞：

Worksheet("sheet").Range("F:J").AutoFilter Field:=1, Criteria1:="Fruits", VisibleDropDown:=True
Worksheet("sheet").Range("F:J").AutoFilter Field:=5, Criteria1:="Doll", VisibleDropDown:=True