VBA Excel autofiltermode = false不关闭自动过滤器

gho*_*r34 4 excel vba autofilter excel-vba

用过activesheet.autofiltermode = false

dim Myworksheet as worksheet
Myworksheet.autofiltermode = false
Run Code Online (Sandbox Code Playgroud)

我也没有Myworksheet.ShowAllData预先使用自动过滤器.使用Office 2013 Professional Plus

Ror*_*ory 7

对于表,您需要不同的语法:

activesheet.listobjects(1).Autofilter.showalldata
Run Code Online (Sandbox Code Playgroud)

清除过滤器,或:

activesheet.listobjects(1).ShowAutoFilter = False
Run Code Online (Sandbox Code Playgroud)

如果您不希望下拉菜单可见.


小智 5

最终帮助我弄清楚如何确保Excel表的AutoFilter打开并显示所有数据.我的最终代码是这样的:

If ActiveSheet.ListObjects(1).ShowAutoFilter Then
   ActiveSheet.ListObjects(1).AutoFilter.ShowAllData
Else
   ActiveSheet.ListObjects(1).ShowAutoFilter = True
End If
Run Code Online (Sandbox Code Playgroud)