【原】VBA表格取消自动筛选状态

VBA取消工作表的自动筛选模式可以使用以下代码：

ActiveSheet.AutoFilterMode = False '取消当前工作表的自动筛选

或者

If ActiveSheet.AutoFilterMode = True Then Cells.AutoFilter '检测当前工作表是否处于自动筛选模式，如是则去掉自动筛选【Cells可以换成指定单元格Range("A1")、指定行rows(1)，效果一样】

或者

If ActiveSheet.AutoFilterMode = True Then ActiveSheet.AutoFilter.ShowAllData '检测当前工作表是否处于自动筛选模式，如是则去掉自动筛选

如果想要指定工作表去除自动筛选状态，只需把以上代码的ActiveSheet换成Sheets("工作表名")即可。

以上内容对您有帮助可以分享或转藏，避免以后找不到。想要了解更多VBA相关知识，欢迎到http://moqingyan.360doc.com我的个人图书馆查看。