是否可以同时过滤单个表中的多个字段?
我有一个过滤器,但不确定如何添加第二个字段。
wS.ListObjects("StructureTable").Range.AutoFilter Field:=1, Criteria1:=wC.Range("F" & x)
谢谢!
最佳答案
您可以直接调用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
结束子
前:
后:
关于excel - ListObject 表上的两个过滤器,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/39301543/