我有一个简单的宏,它根据A13单元格中的值过滤行。效果很好。
With ActiveSheet
.Range("B2:F5000").AutoFilter Field:=2, Criteria1:=.Range("A13")
End With
但是我需要为这个过滤器应用更多的值,特别是基于两个或更多的单元格。所以我运行这个宏:
With ActiveSheet
.Range("B2:F5000").AutoFilter Field:=2, Criteria1:=.Range("A13:A14:A15")
End With
但是它只过滤基于A15单元的值。为什么会这样呢?我已经阅读了这里的所有主题,但是没有解决这个具体问题的办法。谢谢你们的帮助。利波。
发布于 2018-07-06 01:46:24
Field:=1
上的过滤器。如果您的范围从B列开始,并且希望在B列中筛选,那么这是第一个字段,而不是第二个字段。=200
对数字200
进行过滤。下面是一个应该有效的例子。
With ActiveSheet 'better reference a sheet by its name like: Worksheets("Sheet1")
If .AutoFilterMode = True Then .AutoFilterMode = False 'remove old autofilter
.Range("B:F").AutoFilter Field:=1, Operator:=xlFilterValues, _
Criteria1:=Array("=" & .Range("A13").Value, "=" & .Range("A14").Value, "=" & .Range("A15").Value)
End With
发布于 2021-06-07 20:52:47
试着:
.Range("B2:F5000").AutoFilter Field:=2, Criteria1:=Array(Range("A13"), Range("A14"), Range("A15"))
https://stackoverflow.com/questions/51204763
复制相似问题