在excel中,如何取消全部隐藏工作表?

一个工作簿里有很多工作表，原先我把工作表隐藏了，现在需要显现出来，如果一个个取消隐藏的话，效率太低，请问有什么高招给一次性解决！谢谢！

按住alt依次按f11,i,m粘贴下森汪塌面的代码后按f5即可全部显示.

Sub test()
For Each sh In ThisWorkbook.Sheets
sh.Visible = True
Next
End Sub

另外可以此圆用陵键视图管理器,在所有工作表显示时创建一个视图.下次只需切换到该视图就可以显示全部工作表.

工具－宏－编辑器里把2改成－1