excel中VBA快速取消工作簿中各工作表的自动筛选

重庆中职学校 中职招生 中职报考中心 重庆职校报名网 公办重点中职招生办电话 重庆职校报名网 重庆中专学校招生

当工作簿中的工作表数量较多时,要快速取消各个工作表中的自动筛选可以下面的VBA代码。

1.按Alt+F11,打开VBA编辑器。

2.在代码窗口中输入下列代码

Sub RemoveAllAutoFilter()
Dim sht As Worksheet
For Each sht In ActiveWorkbook.Worksheets
If sht.AutoFilterMode = True Then sht.AutoFilterMode = False
Next
End Sub

3.关闭VBA编辑器,按快捷键Alt+F8,打开“宏”对话框,选择包含“RemoveAllAutoFilter”的宏名,并单击“执行”按钮。

重庆中职学校 中职招生 中职报考中心 重庆职校报名网 公办重点中职招生办电话 重庆职校报名网 重庆中专学校招生
版权声明

本文仅代表作者观点,不代表本站立场。
本站资源均来自互联网整理,版权归原作者所有,切勿用作非法使用和未经授权的商用,因此带来的法律风险与本站无关。

本文链接:http://www.chousj.cn/exceljc/862.html

发表评论

评论列表(0人评论 , 37人围观)
☹还没有评论,来说两句吧...

免费资源分享网_电脑操作教程_免费源代码下载_免费字体下载_高清电脑壁纸

http://www.chousj.cn/

| 渝ICP备15004826号

Powered By

使用手机软件扫描微信二维码

关注我们可获取更多热点资讯

Honor accompaniments. theme qk_xmh