右键一哥sheet,然后把想要取消隐藏的选中就可以了，这样的话虽然有一点麻烦，但是比较好用，有些你不想取消隐藏的也不会显示，按你自己的选择来。
有些语句没有用，简化如下：
Sub 取消所有隐藏工作表()
Dim i%
For i = 1 To Sheets.Count
Sheets(i).Visible = ture
Next i
End Sub
全部选中包含已经隐藏的项目，单击右键菜单，弹出对话框，在里边选择取消隐藏，就全部取消隐藏了，很简单的
没有批量取消隐藏，可以使用VBA实现。
去掉吧，不能隐藏
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024