求N多条件筛选的VBA

c222y

求N多条件筛选的VBA，数据有几千条，1.筛选K列包含字符“下料”，2.D列包含字符“玻璃、五金、DD、HHH、SS、A4，3.M不包含字符“完成”的数据复制到表一

爱疯

汇总2.rar (20.06 KB, 下载次数: 18)

2020-5-24 09:36 上传

点击文件名下载附件


Sub test()
    Dim x, y, z
    Set x = Sheets(1).UsedRange
    Set y = Sheets(2).Range("A1").CurrentRegion
    Set z = Sheets(3).Range("A1").CurrentRegion
    z.Clear
    x.AdvancedFilter xlFilterCopy, y, z
End Sub


这样可以吗？条件表需自己填