假设有隐藏的工作要隐藏。如果少量隐藏的工作表被取消,请直接在“工作表”选项卡中选择要隐藏的表单,然后一次单击一个以取消隐藏。但是,如果有很多隐藏的工作表,需要取消隐藏,该怎么办?通过一次单击取消隐藏工作表太辛苦,效率太低。此时,使用VBA方法,VBA语句只需做力所能及的事。(大卫亚设,Northern Exposure)。
具体程序如下:
步骤1:按Alt F11快捷键调出VBA操作界面
步骤2:单击其中一个工作表,右键单击插入,然后选择模块
3)在模块中输入以下VBA代码,然后关闭整个VBA接口
Sub ShowSht()
Dim sht As Worksheet
For Each sht In Worksheets
=-1
Next sht
End Sub
4)按快捷键alt F8,在对话框宏界面中单击Showsht,然后单击“运行”即可完成。可以看到左右隐藏的工作表瞬间显现出来。上帝并不神奇
具体操作视频如下。