VBA：运行时错误＆＃39; 424＆＃39;使用AutoFilter

Question

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

Sub delMakro（）

Dim rngAutoFill As Range

设置rngAutoFill =范围（＆＃34; A1：Z1＆＃34;）

rngAutoFill.Select
rngAutoFill.AutoFilter = True

End Sub

我收到运行时错误＆＃39; 424＆＃39;但不明白为什么

Answer 1

Autofilter()方法可以返回（Variant）值但不能分配一个值，就像您尝试使用rngAutoFill.AutoFilter = True < / p>

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

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

如果您想在您的范围的第一个字段中显示下拉箭头

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

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

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