AutoFilter数组仅使用数组中的最后一个条件进行过滤。
创始人
2024-11-12 13:30:08
0

使用For循环迭代数组中的每个条件,以便AutoFilter可以按照所有条件进行过滤。

示例代码:

Sub Filter_Data() Dim FilterArray As Variant Dim ws As Worksheet Dim lastRow As Long

Set ws = ThisWorkbook.Worksheets("Sheet1")
lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row

FilterArray = Array("Vendor A", "Vendor B", "Vendor C") '多个条件

With ws
    .Range("A1:D1").AutoFilter '打开AutoFilter
    For i = LBound(FilterArray) To UBound(FilterArray) '循环条件并应用每个条件
        .Range("D1").AutoFilter Field:=4, Criteria1:=FilterArray(i), Operator:=xlFilterValues
    Next i
End With

End Sub

相关内容

热门资讯

透视代打!德普辅助器辅助器怎么... 透视代打!德普辅助器辅助器怎么用,德普之星app安卓版破解版,科技教程(有挂规律)1.德普辅助器辅助...
透视线上!pokemmo内置修... 透视线上!pokemmo内置修改器,哈糖大菠萝有挂吗,2025新版教程(有挂教程);一、哈糖大菠萝有...
透视总结!德普之星辅助器怎么用... 透视总结!德普之星辅助器怎么用,德普软件,黑科技教程(有挂解说)1、完成德普之星辅助器怎么用的残局,...
透视中牌率“pokemmo脚本... 透视中牌率“pokemmo脚本辅助”透视辅助下载(其实存在有挂);1、每一步都需要思考,不同水平的挑...
透视私人局!德普之星私人局透视... 透视私人局!德普之星私人局透视,德普之星透视辅助软件,黑科技教程(有挂解说)暗藏猫腻,小编详细说明德...
透视辅助!哈糖大菠萝助手,拱趴... 透视辅助!哈糖大菠萝助手,拱趴大菠萝作弊方法,详细教程(有挂脚本)1、很好的工具软件,可以解锁游戏的...
透视脚本!德普之星辅助软件,(... 透视脚本!德普之星辅助软件,(德普)真是真的是有挂,2025新版教程(有挂解密);1、在德普之星辅助...
透视辅助!哈糖大菠萝能开挂吗,... 透视辅助!哈糖大菠萝能开挂吗,德州透视是真的假的,新2025教程(有挂辅助)1、金币登录送、破产送、...
透视新版!德普之星辅助软件,德... 透视新版!德普之星辅助软件,德普之星私人局辅助免费,新2025教程(有挂教程)1、金币登录送、破产送...
透视软件!werplan有挂吗... 透视软件!werplan有挂吗,agpoker辅助,高科技教程(有挂细节)1、werplan有挂吗a...