excel中VBA快速取消工作簿中各工作表的自动筛选
时间:2023-09-22 08:16:05
当工作簿中的工作表数量较多时,要快速取消各个工作表中的自动筛选可以下面的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”的宏名,并单击“执行”按钮。
标签:excel,中,VBA,快速,取消,工作簿,中各,工,作表,的
0
投稿
猜你喜欢
wps公式编辑器怎么用?金山WPS数学公式编辑器使用教程
2023-10-13 06:53:49
Win10 KB3081424补丁BUG可用注册表解决
2023-09-09 23:42:58
利用文本框嵌套Word表格的方法 实现word文档表格旋转90度
2022-12-30 15:13:28
为什么word编号会出现大空格
2023-11-29 18:47:45
PowerPoint演示文稿怎么打印成讲义
2023-08-29 21:08:52
word 画图教程大全
2023-08-29 14:18:59
Mac版人人译视界如何修改字幕样式?人人译视界修改字幕样式的图文教程
2023-02-03 22:31:03
win10系统设置打开PrtScn按键进行屏幕截图的方法
2023-03-28 01:35:57
如何查询 Windows 启动方式是UEFI还是BIOS
2023-01-14 23:06:38
Win8.1系统出现蓝屏错误代码0x0000007F的解决方法
2022-04-18 03:56:59
Win10更新时出现低级Bug:无法安装更新 电脑已关闭
2022-11-26 04:20:01
WPS演示办公—如何利用图形快速打造幻灯片模版
2022-07-09 18:44:26
如何把Win10操作中心的“便笺”按钮放到桌面、开始菜单/屏幕
2022-05-17 06:44:17
excel如何把两张表格合成一张
2022-07-20 12:16:06
TL-WN725N无线网卡驱动怎么安装
2023-02-03 05:27:36
win10电脑玩求生之路2卡死死机的解决方式
2023-05-18 03:52:01
Win7系统只有一个C盘该怎么解决?
2022-04-21 10:25:22
Mac下command+R和shift+command+R的区别(在线恢复模式的选择)
2023-06-02 04:35:57
驱动精灵不联网能装驱动吗_驱动精灵不联网装驱动详情
2022-12-25 23:06:44
PPT一个简单的扁平转场制作实例教程
2022-07-14 23:01:39