大家看看下面的Excel文件，实际有6张工作表，其中5张工作表隐藏了。按照我们常规的操作，就是逐一选中工作表，然后一个一个的去点击取消隐藏。
假设有N张工作表，我们得反复点击多少次鼠标！所以，今天小雅给大家分享一段省事偷懒的代码，学会这个技巧，可以在同事面前耍耍酷，炫耀一下。
VBA代码如下：
Sub xianshi（）
Dim sh As Worksheet
For Each sh In Sheets
sh.Visible=1
Next
End Sub
具体的操作步骤，请伙伴们观看下面的动画演示：
想学习更多Excel基础方法与技巧的，推荐：
想学习一整套完整Excel课程的，可以去这里拍：
office软件PPT Word Excel办公教程 入门到精通全套自学视频教学 赠送全套Office软件
赠送全套正版OFFICE软件：Office 2003、2007、2010。 全自动安装、安装过程自动激活、永久使用
转载请注明：日记男孩的博客 » Excel教程：3秒，批量取消隐藏工作表！