excel一次性显示多个隐藏的工作表

有时候，我们收到一些Excel文件，发现其中很多个工作表被隐藏了，想要看其中的内容时，只能一个一个取消隐藏，有没有可以一次性显示全部隐藏单元格的方法呢？
1、原始工作表，可以看到有很多个隐藏的工作表
2、Alt+F11，打开VBA编辑界面，双击左侧任意一个工作表，使代码编辑区域显示处理
3、在代码编辑区域，复制如下代码：
复制内容到剪贴板
Sub main()

For Each sh In Sheets

sh.Visible = True

Next

End Sub
4、点击三角形符号，或者直接按F5，运行程序
5、关闭VBA界面，返回Excel，就可以看到全部工作表都已经显示出来了
注意事项：VBA与Excel是相对独立的，编辑完VBA代码之后，关闭VBA，代码还存在，不会影响到代码的运行；但如果删除了代码所在的工作表，代码就会被删除，无法正常运行了。