时间戳

首页 > 解决方案 > 如何从条件列表中过滤表？

excel - 如何从条件列表中过滤表？

问题描述

我想使用 Sheet2 A1:A10 上的 Criteria 过滤 Sheet1 A1:G1000 中的第 7 列表

我写过 VBA，但它只从单元格 A10 过滤。

Sub FilterTest1()
    Dim c As Variant
    With Worksheets("Sheet1")
        c = Worksheets("Sheet3").Range("A1:A10")
        .Range("A1:G1000").AutoFilter field:=6, Criteria1:=c
    End With
End Sub

标签： excelvba

解决方案

感谢阅读，我刚刚想出了如何使用高级过滤器。

Sub Macro1()

    Range("A1:G1000").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
        Sheets("Sheet3").Range("A1:A10"), Unique:=False
End Sub

推荐阅读