VBA：使用自动筛选的运行时错误“424”

【问题标题】：VBA: Run-time error '424' with AutoFilterVBA：使用自动筛选的运行时错误“424”
【发布时间】：2017-03-05 22:21:53
【问题描述】：

我已经搜索了论坛，但没有找到我的问题的答案。

子delMakro()

Dim rngAutoFill As Range

设置 rngAutoFill = Range("A1:Z1")

rngAutoFill.Select
rngAutoFill.AutoFilter = True

结束子

我收到运行时错误“424”但不明白为什么

【问题讨论】：

【解决方案1】：

Autofilter() 方法可以返回 (Variant) 值，但它不能分配像您尝试使用 rngAutoFill.AutoFilter = True 那样的值

如果您只想在相关范围内切换下拉箭头的显示，请使用

rngAutoFill.AutoFilter '<-- if dropdown arrows were off, it turns them on and viceversa

如果您想让下拉箭头出现在您的范围的第一个字段中

rngAutoFill.AutoFilter field:=1, VisibleDropDown:=True

如果你想让下拉箭头出现在你的范围的第二个和第四个字段中

rngAutoFill.AutoFilter field:=Array(2,4), VisibleDropDown:=True

【讨论】：