Excle中如何取消全部隐藏的工作表

1、首先呢，我们将打开一个excle表格，将除第一个文件以外的工作表都隐藏起来。

2、然后，按ALT+F11快捷键，打开VBA代码界面，点击插入--插入模块。

3、在新建的模块中插入下列代码：

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

Dim i As Integer

For i = 1 To Sheets.Count

    Sheets(i).Visible = True

Next i

End Sub

4、然后关闭VBA代码界面，按快捷键ALT+F8，打开宏执行对话框。

5、最后，就会发现所有被隐藏的工作表都全部显示出来了。