Excel自动筛选条件值设置错误?

我一直在尝试应用一个自动filter到我的Excel工作表,我想弄清楚如何只显示某些标准值。

下面的代码,许多build议应达到我想要的。

Expression.Range(A1:G1).Autofilter(5, '=Array("value", "value")', xlFilterValues, None, True) 

以下文档可以在这里find: https : //msdn.microsoft.com/en-us/library/office/ff193884.aspx

代码执行但不会select数组中列出的条件。 当我打开工作簿并查看自定义filter时,它会在等于下拉菜单旁边显示此值:

= Array(“value”,“value”)

那么我怎么去获取select和显示的值,就像你将在Excel中手动? 我似乎可以find唯一的解决scheme是使用数组函数,但我没有任何运气。

以下是将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 

虽然这工作,我从来没有这样做(我总是命名的参数)