通过VBA可以实现一次性显示或隐藏多个工作表。
在Excel中,鼠标右键单击工作表标签,可以显示隐藏的一个工作表,如图。但一次操作只能显示一个,工作表数量多时很麻烦。
可以通过VBA代码完成以上的批量操作:
1、打开工作表→快捷键Alt+F11,在左边窗口右键,新建模块:
2、双击模块1,在右边代码窗口输入代码:
Sub 批量显示工作表()
Dim sht As Worksheet
Application.EnableEvents = False
For Each sht In Worksheets
sht.Visible = 1 '显示所有工作表
Next
Application.EnableEvents = True
End Sub
3、回到工作表,按ALt+F8,选中相应宏,单击执行,就可以将所有隐藏的工作表都显示出来了: