Excel表格中如何批量取消隐藏所有的工作表_利用简单的VBA宏代码一键执行

2026-01-30 00:00:00 作者：P粉602998670

可通过运行VBA宏批量取消隐藏所有工作表：先按Alt+F11打开编辑器，插入模块后粘贴UnhideAllSheets代码，保存为.xlsm格式
，再按Alt+F8运行宏或设Ctrl+U快捷键执行。

如果您在Excel中隐藏了多个工作表，需要快速恢复所有被隐藏的工作表，则可以通过运行一段简短的VBA宏代码实现批量取消隐藏。以下是具体操作步骤：

一、打开Excel的VBA编辑器并插入新模块

该步骤用于创建可执行的宏环境，确保代码有位置存放并能被调用。VBA编辑器是运行自定义脚本的基础平台。

1、按 Alt + F11 组合键，打开Visual Basic for Applications编辑器。

2、在左侧“工程资源管理器”中，右键单击当前工作簿名称（如 VBAProject (Book1.xlsm)）。

3、选择插入 → 模块，新建一个标准模块。

二、粘贴并输入取消隐藏全部工作表的VBA代码

该代码遍历当前工作簿中的每一个工作表，并将其Visible属性设为xlSheetVisible，从而强制解除所有隐藏状态。

1、在右侧代码窗口中，完整输入以下代码：

Sub UnhideAllSheets()

Dim ws As Worksheet

For Each ws In ThisWorkbook.Worksheets

ws.Visible = xlSheetVisible

Next ws

End Sub

三、保存文件为启用宏的格式

Excel默认不支持在.xlsx文件中运行宏，必须将文件另存为支持VBA的格式，否则代码无法保存或执行。

1、关闭VBA编辑器，返回Excel主界面。

2、点击文件 → 另存为 → 浏览，选择保存位置。

3、在“保存类型”下拉菜单中，选择Excel启用宏的工作簿 (*.xlsm)。

4、点击保存按钮确认。

四、运行宏以批量取消隐藏所有工作表

执行已编写完成的宏命令，触发对全部工作表可见性属性的批量修改。

1、按 Alt + F8 打开宏对话框。

2、在列表中选中UnhideAllSheets，点击运行按钮。

3、观察底部工作表标签栏，所有此前隐藏的工作表将立即显示出来。

五、使用快捷键快速运行宏（可选增强方式）

为避免每次调用都需打开宏对话框，可为该宏指定快捷键，提升重复操作效率。

1、再次按 Alt + F8，选中UnhideAllSheets。

2、点击选项按钮，在弹出窗口中输入任意字母（如U）作为快捷键。

3、点击确定后，此后只需按Ctrl + U即可一键执行取消隐藏操作。

返回首页上一篇：Excel表格中如何批量修改带公式单元格的引用路径_利用查找下一篇：php统计图表坐标轴刻度不均_php自定义刻度间隔法【步骤】

联络方式：

400 9058 355

邮箱：8955556@qq.com

Q Q：8955556

微信二维码

我们猜你喜欢

400 9058 355

Excel表格中如何批量取消隐藏所有的工作表_利用简单的VBA宏代码一键执行

一、打开Excel的VBA编辑器并插入新模块

二、粘贴并输入取消隐藏全部工作表的VBA代码

三、保存文件为启用宏的格式

四、运行宏以批量取消隐藏所有工作表

五、使用快捷键快速运行宏（可选增强方式）

猜你喜欢

联络方式：

400 9058 355

如何在 Heroku 上部署 Go 的

PySNMP getCmd 返回整数 0

如何使用Golang time Slee

php创建文件含特殊符号怎写_php特殊

如何为 WooCommerce 分组产品

如何在Golang中操作IO流_Gola

如何在 Yii2 中正确将模型数据传递到

如何为 WooCommerce 分组商品

如何在 Pytest 中正确管理 Moc

如何用Golang实现基础消息队列_Go

客服QQ