如何取消隐藏“非常隐藏”工作表

45

我在工作表设置中四处乱逛，以某种方式设法使工作表“非常隐藏”，但似乎无法再次使其可见。如何使其可见？

我正在使用Excel 2010。

microsoft-excel

— 泰勒
source

41

一种选择是使用VBA

尝试以下方法：

Sub UnHide()
Dim ws As Worksheet
For Each ws In Sheets
    ws.Visible = True
Next
End Sub

这将显示所有隐藏或非常隐藏的工作表

— 彼得·H
source

5

是的，Very Hidden只能使用VBA隐藏。

— BruceWayne

3

不，那是错的。查看我的回复。

— NiklasJ

9

@NiklasJ代码没有错；这将使其设置为可见。

— TylerH

8

@NiklasJ-此代码将一次性取消隐藏所有工作表，您的方法将一次取消隐藏一个工作表。都没错，都是正确的。这是我会选择的方法，因为我什至不知道您的方法存在！瓷砖！

— FreeMan

11

@TylerH我认为Nilklas指的是必须使用代码取消隐藏单元格的隐式声明。他的答案不依赖于代码。

— jpaugh

60

您可以这样操作：

— 尼克拉斯
source

15

在VBA编辑器中，转到工作表属性并更改以下属性

— 蝎子99
source

3

这和上面的NiklasJ一样吗？

2

我只是注意到，是的，但是有图片。

— Scorpion99

您应该已经编辑@NiklasJ的答案并添加了图片...

— 我说，莫妮卡（Monica）恢复

我不小心将工作簿中的唯一工作表隐藏了！我尝试了上述操作，保存了电子表格，然后尝试将其打开，但它（整个工作簿）不可见。有任何想法吗？

— 马克·斯图尔特

哈！我打开了另一个电子表格，这就是为什么我什么都看不到的原因。我关闭了所有Excel工作簿，然后打开它，什么都看不到，但是“查看”工具栏启用了取消隐藏选项！

— 马克·斯图尔特

1

若要使它们隐藏，但在选项菜单中可见（UnHide ..），请使用与此相同的代码。

Sub StillHide()
Dim ws As Worksheet
For Each ws In Sheets
    ws.Visible = xlSheetHidden  <-- change from Visible to this.
Next
End Sub

这样，选项卡不会突然显示给用户。他们仍然是“隐藏的”。

— Fandango68
source