显示隐藏工作表的宏操作：按ALT+F11，点击插入菜单中的模块，在右边的代码输入框中输入如下代码，再按F5键即可全部显示。
Sub KDK()
For Each AA In Sheets
AA.Visible = True
Next
End Sub
