Question

我正在尝试根据过滤器1和过滤器2选择一系列值，然后删除所有这些值;所以我只留下列中的filter1和filter2值。我可以添加一个过滤器，但我无法添加两个过滤器。请帮忙/指导。

代码：

Case "Sheet-1"
                         iCol = 2
                         Rows("4:4").Select      
                         Selection.AutoFilter
                         ActiveSheet.Range("$A$4:$WXR$99999").AutoFilter Field:=iCol, Criteria1:= _
                         "<>*ABC*", Operator:=xlOr, Criteria2:="<>XYZ*"
                         Rows("5:5").Select 
                         Range(Selection, Selection.End(xlDown)).Select
                         Range(Selection, Selection.End(xlDown)).Select
                         Selection.Delete Shift:=xlUp
                         ActiveSheet.Range("$A$4:$WXR$99999").AutoFilter Field:=iCol

Answer 1

您的第二个过滤器的标准是什么？我想那个人不见了。

Answer 2

如果您转到“开发者”标签，然后点击Record Macro。它将为您提供所有您正在做的事情的VBA代码。所以只需点击Record Macro即可。然后选择要过滤的内容。转到Data标签，然后选择过滤器。它会在您选择的任何数据上放置一个箭头。单击箭头并放置过滤器。之后，返回并点击Stop Recording。然后转到你的代码编辑器，那里会有一个模块，里面有你需要过滤的代码。然后只需将其复制并粘贴到您需要的地方即可。

在VBA范围过滤器中添加两个标准

2 个答案: