Excel VBA取消全部隐藏的工作表?

时间:2026-02-13 01:36:46

1、首先打开数据表格需要将sheet1以外的表格进行全部隐藏,如下图所示:

Excel VBA取消全部隐藏的工作表?

Excel VBA取消全部隐藏的工作表?

2、然后按alt+f11快捷键,打开VBA代码界面,如下图所示:

Excel VBA取消全部隐藏的工作表?

3、插入模块,如下图所示:

Excel VBA取消全部隐藏的工作表?

4、然后在新的模块里输入如下代码:

Sub 打开全部隐藏工作表()

Dim i As Integer

For i = 1 To Sheets.Count

    Sheets(i).Visible = True

Next i

End Sub

,如下图所示:

Excel VBA取消全部隐藏的工作表?

5、回到excel界面快捷键alt+f8打开宏执行对话框,如下图所示:

Excel VBA取消全部隐藏的工作表?

6、找到对应的命令,单击执行按钮,如下图所示:

Excel VBA取消全部隐藏的工作表?

7、即可看到隐藏的图表,全部显示出来,如下图所示:

Excel VBA取消全部隐藏的工作表?

© 2026 小猪生活
信息来自网络 所有数据仅供参考
有疑问请联系站长 site.kefu@gmail.com