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

相关内容

热门资讯

透视肯定!aapoker如何设... 透视肯定!aapoker如何设置胜率(透视)免费透视脚本(总是真的是有挂)1、玩家可以在aapoke...
透视好友!德州局透视,拱趴大菠... 透视好友!德州局透视,拱趴大菠萝挂(竟然有挂)1)拱趴大菠萝挂辅助挂:进一步探索拱趴大菠萝挂辅助透视...
透视科技!aapoker辅助怎... 透视科技!aapoker辅助怎么用(透视)透视脚本(竟然存在有挂)1、该软件可以轻松地帮助玩家将aa...
透视科技!pokemmo脚本辅... 透视科技!pokemmo脚本辅助器下载,德州私人局脚本(本来是真的有挂)1、全新机制【pokemmo...
透视规律!aapoker辅助软... 透视规律!aapoker辅助软件合法吗(透视)免费透视脚本(确实存在有挂)1、aapoker辅助软件...
透视系统!pokeplus脚本... 透视系统!pokeplus脚本,约局吧德州真的有透视挂吗(确实真的是有挂)1、约局吧德州真的有透视挂...
透视脚本!aapoker脚本(... 透视脚本!aapoker脚本(透视)脚本(果然真的是有挂);1、进入游戏-大厅左侧-新手福利-激活码...
透视安装!werplan辅助软... 透视安装!werplan辅助软件,智星德州可以透视吗(总是有挂)1、不需要AI权限,帮助你快速的进行...
透视真的!aapoker透视插... 透视真的!aapoker透视插件(透视)插件下载(都是是真的有挂)1、进入游戏-大厅左侧-新手福利-...
透视脚本!poker红龙辅助,... 透视脚本!poker红龙辅助,wepoker安装教程(总是真的有挂)1、下载好wepoker安装教程...