隐藏所有自动筛选下拉用一行代码

Question

我有很多数据的相当大的Excel文件。我用这导致通过VBA过滤器的验证列表。因为我有52列（一个年度的每周）我自动获得每头小的下拉箭头。

我用这个小片的代码来隐藏下拉手动箭头为每列：

Worksheets("Agenda").Range("B6").AutoFilter Field:=1, VisibleDropDown:=False

这完美的作品，但是当我创建通过需要花费大量的时间来完成所有的代码52列与它循环来，它运行每次有人添加带有验证列表过滤器。

有没有办法通过只用一行代码来做到这一点？我可以设置VisibleDropDown为False在上述表中的所有列？

提前致谢！

Answer 1

这是一个非常简单的，我认为... - 选择您的所有数据 - 选择“格式表” - 转到表丝带 - 重命名表以“myBigTable” - 宏行：ActiveSheet.ListObjects("YourTableName").ShowAutoFilterDropDown = False