Excel自动过滤条件值是否设置错误?

时间:2016-05-13 14:10:36

标签: excel vba excel-vba

我一直在尝试将自动过滤器应用到我的Excel工作表中,并且我试图弄清楚如何只显示某些标准值。

以下许多建议应该实现我想要的代码。

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

可在此处找到以下文档: https://msdn.microsoft.com/en-us/library/office/ff193884.aspx

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

=数组("值","值")

那么如何才能像在excel中手动选择和显示值一样?我似乎找到的唯一解决方案是使用数组函数,但我没有运气。

1 个答案:

答案 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

虽然这有效,但我从不这样做(我总是命名参数)