我一直在尝试将自动过滤器应用到我的Excel工作表中,并且我试图弄清楚如何只显示某些标准值。
以下许多建议应该实现我想要的代码。
Expression.Range(A1:G1).Autofilter(5, '=Array("value", "value")', xlFilterValues, None, True)
可在此处找到以下文档: https://msdn.microsoft.com/en-us/library/office/ff193884.aspx
代码执行但不会选择数组中列出的条件。当我打开工作簿并查看自定义过滤器时,它会在等于下拉菜单旁边显示该值:
=数组("值","值")
那么如何才能像在excel中手动选择和显示值一样?我似乎找到的唯一解决方案是使用数组函数,但我没有运气。
答案 0 :(得分:2)
以下是将Criteria
设置为数组的一种方法:
Sub qwerty()
Dim Expression As Range
Set Expression = Range("A1:G1")
ary = Array("value1", "value2")
Expression.AutoFilter 5, ary, xlFilterValues, None, True
End Sub
虽然这有效,但我从不这样做(我总是命名参数)。