excel - ListObject 表上的两个过滤器

Question

是否可以同时过滤单个表中的多个字段？

我有一个过滤器，但不确定如何添加第二个字段。

wS.ListObjects("StructureTable").Range.AutoFilter Field:=1, Criteria1:=wC.Range("F" & x)

谢谢!

Answer 1

您可以直接调用AutoFilter第二次方法并给出2对于Field参数(假设您的表有 2 列)。例如。:

wS.ListObjects("StructureTable").Range.AutoFilter Field:=**2**, Criteria1:=wC.Range("F" & x)

完整代码:

Option Explicit

Sub Test()

    Dim ws As Worksheet
    Dim lst As ListObject

    Set ws = ThisWorkbook.Worksheets(1)
    Set lst = ws.ListObjects(1)

    'clear any existing filter
    If lst.ShowAutoFilter Then
        lst.ShowAutoFilter = False
    End If

    'set filter from range parameters
    With lst.Range
        .AutoFilter Field:=1, Criteria1:=ws.Range("D1")
        .AutoFilter Field:=2, Criteria1:=ws.Range("E1")
    End With

结束子

前:



后: