如何在Excel中取消隐藏工作表:显示多个或所有隐藏工作表

  • Share This
Michael Brown

本教程介绍了如何在Excel 2016、2013、2010及以下版本中取消工作表的隐藏。 你将学习如何通过右键快速取消工作表的隐藏,以及如何通过VBA代码一次取消所有工作表的隐藏。

想象一下:你打开一个工作表,发现有些公式参考了另一个工作表。 你看了看工作表标签,但被参考的电子表不在那里!你试图用同样的名字创建一个新的工作表,但Excel告诉你它已经存在了。 这一切意味着什么? 很简单,工作表被隐藏了。 如何查看Excel中隐藏的工作表? 很明显,你必须取消隐藏它们。 这可以是通过使用Excel的 解除隐藏 本教程将教你这两种方法。

    如何在Excel中取消隐藏工作表

    如果你只想看一或两张隐藏的床单,这里有一个快速解除隐藏的方法。

    1. 在你的Excel工作簿中,右键单击任何工作表标签并选择 解除隐藏 ...从上下文菜单中。
    2. 解除隐藏 框,选择你要显示的隐藏工作表,然后点击 认可 (或双击工作表的名称)。 完成了!

    除了右键上下文菜单,还有 解除隐藏 对话框可以从功能区进入。

    • 在Excel 2003和更早的版本中,点击 格式 菜单,然后点击 钣金 > 解除隐藏 .
    • 在Excel 2016、Excel 2013、Excel 2010和Excel 2007中,进入 首页 标签> 细胞 组,并点击 格式 隶属 可见性 , 指向 隐藏 & 取消隐藏 ,然后点击 揭开床单 ...

    注意:Excel的 解除隐藏 要取消多个工作表的隐藏,你必须对每个工作表单独重复上述步骤,或者你可以通过使用下面的宏来一次性取消所有工作表的隐藏。

    如何用VBA在Excel中取消隐藏工作表

    在你有多个隐藏的工作表的情况下,逐个解除隐藏可能非常耗时,特别是如果你想解除工作簿中所有工作表的隐藏。 幸运的是,你可以用下面的一个宏来自动完成这个过程。

    如何在Excel中取消隐藏所有工作表

    这个小宏使活动的工作簿中所有隐藏的工作表立即可见,而不会用任何通知来干扰你。

    Sub Unhide_All_Sheets() Dim wks As Worksheet For Each wks In ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible Next wks End Sub

    显示所有隐藏的床单并显示其数量

    和上面的宏一样,这个宏也是显示工作簿中所有隐藏的工作表。 不同的是,在完成后,它会显示一个对话框,告知用户有多少工作表被解除隐藏。

    Sub Unhide_All_Sheets_Count() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If wks.Visible xlSheetVisible Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & " worksheets have been unhidden. " , vbOKOnly, " Unhiding worksheets" Else MsgBox "No hidden worksheets have been found. " , vbOKOnly,"取消隐藏工作表" End If End Sub

    解除你选择的多个工作表的隐藏

    如果你不希望一次解除所有工作表的隐藏,而是只解除那些用户明确同意可见的工作表,那么让宏单独询问每个隐藏的工作表,像这样。

    Sub Unhide_Selected_Sheets() Dim wks As Worksheet Dim MsgResult As VbMsgBoxResult For Each wks In ActiveWorkbook.Worksheets If wks.Visible = xlSheetHidden Then MsgResult = MsgBox( "Unhide sheet " & wks.Name & " ?" , vbYesNo, " Unhiding worksheets" ) If MsgResult = vbYes Then wks.Visible = xlSheetVisible End If Next End Sub

    取消隐藏工作表,工作表名称中包含一个特定的词

    如果你只想取消包含某些文本的工作表的名称,可以在宏中添加一个IF语句,该语句将检查每个隐藏的工作表的名称,并只取消那些包含你指定文本的工作表。

    在这个例子中,我们取消了带有""字样的表单。 报告 "该宏将显示诸如以下表格 报告 , 报告1 , 七月报告 ,以及类似的情况。

    要取消隐藏名称中包含其他单词的工作表,请替换" 报告 ",在下面的代码中加入你自己的文字。

    Sub Unhide_Sheets_Contain() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If (wks.Visible xlSheetVisible) And (InStr(wks.Name, "report" )> 0) Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & " worksheets have been unhidden. " , vbOKOnly, " Unhiding worksheets" Else MsgBox " No hidden已找到具有指定名称的工作表。" , vbOKOnly, "取消隐藏工作表" End If End Sub

    如何使用宏来解除Excel中工作表的隐藏状态

    要在你的工作表中使用宏,你可以在Visual Basic编辑器中复制/粘贴代码,或者下载带有宏的工作簿并从那里运行它们。

    如何在你的工作簿中插入宏

    你可以通过这种方式将上述任何一个宏添加到你的工作簿中。

    1. 打开带有隐藏工作表的工作簿。
    2. 按Alt + F11打开Visual Basic编辑器。
    3. 在左侧窗格中,右键单击 这本工作手册 并选择 插入 > 模块 从上下文菜单中选择。
    4. 将代码粘贴在代码窗口中。
    5. 按F5来运行宏。

    关于详细的步骤说明,请看如何在Excel中插入和运行VBA代码。

    下载带有宏的工作簿

    或者,你可以下载我们的样本工作簿,在Excel中取消隐藏工作表,其中包含本教程中讨论的所有宏。

    • 隐藏所有表格 - 解除活动工作簿中所有工作表的隐藏,并保持沉默。
    • 未隐藏所有表的数量 - 显示所有隐藏的床单和它们的数量。
    • 未显示_选定的表格 - 显示你选择取消隐藏的纸张。
    • 隐藏表的内容 - 取消隐藏名称包含特定单词或文字的工作表。

    要在你的Excel中运行宏,你要做以下工作。

    1. 打开下载的工作簿,如果有提示,请启用宏。
    2. 打开你自己的工作簿,你想在其中看到隐藏的工作表。
    3. 在你的工作簿中,按Alt + F8,选择所需的宏,并点击 运行 .

    例如,如果要解除Excel文件中所有工作表的隐藏,并显示隐藏工作表的数量,你可以运行这个宏。

    如何通过创建自定义视图来显示Excel中的隐藏工作表

    除了宏之外,通过创建自定义视图,可以克服一次次显示隐藏工作表的乏味。 如果你不熟悉这个Excel功能,你可以把自定义视图看作是工作簿设置的一个快照,可以在任何时候通过鼠标点击来应用。 这个方法最好在你工作的最开始使用,此时还没有一个工作表被隐藏。

    所以,我们现在要做的是创建 显示所有表 自定义视图。 下面是方法。

    1. 确保你的工作簿中的所有电子表格都是 可见 这个提示显示了如何快速检查工作簿中的隐藏工作表。
    2. 转到 查看 标签> 工作簿视图 组,并点击 自定义视图 按钮。

  • ǞǞǞ 自定义视图 对话框会出现,你点击 添加...
  • 添加查看 对话框,输入自定义视图的名称,例如 显示所有表格 ,然后点击确定。
  • 现在你可以根据你的需要隐藏任意多的工作表,当你想让它们再次可见时,你可以点击 自定义视图 按钮,选择 显示所有表格 查看并点击 显示 ,或者直接双击该视图。

    就这样!所有隐藏的床单将立即显示出来。

    如何检查一个工作簿是否包含任何隐藏的工作表

    检测Excel中隐藏的工作表的最快方法是这样的:右键单击任何工作表标签,看看是否有 隐藏... 如果它被激活,点击它,看看哪些工作表被隐藏了。 如果它被禁用(灰色),工作簿不包含隐藏的工作表。

    注意:这个方法不能显示非常隐藏的工作表,查看这些工作表的唯一方法是用VBA解除隐藏。

    无法在Excel中取消隐藏工作表--问题与解决方案

    如果你无法在Excel中取消隐藏某些工作表,下面的故障排除提示可能会说明一些原因。

    1.工作簿受到保护

    如果在以下情况下,不可能隐藏或取消隐藏纸张。 工作簿结构 已被保护(不应与工作簿级别的密码加密或工作表保护相混淆)。 要检查这一点,请到 评论 标签> 变化 组,并看一下 保护工作手册 如果该按钮以绿色高亮显示,说明该工作簿受到保护。 要解除保护,请点击 保护工作手册 更多信息,请看如何解锁Excel中受保护的工作簿。

    2.工作表非常隐蔽

    如果你的工作表被VBA代码隐藏了,使它们变得非常隐蔽(指定了 xlSheetVeryHidden 属性),这种工作表不能通过使用 解除隐藏 要取消隐藏的工作表,你需要将属性从 xlSheetVeryHidden xlSheetVisible 从Visual Basic编辑器内或运行此VBA代码。

    3.工作簿中没有隐藏的工作表

    如果 解除隐藏 命令在功能区和右键菜单中都是灰色的,这意味着你的工作簿中没有一个隐藏的工作表 :)

    这就是在Excel中取消隐藏工作表的方法。 如果你想知道如何隐藏或取消隐藏其他对象,如行、列或公式,你可以在下面的文章中找到完整的细节。 我感谢你的阅读,希望下周在我们的博客上看到你的文章!

    可用的下载

    在Excel中取消隐藏工作表的宏程序

    Michael Brown is a dedicated technology enthusiast with a passion for simplifying complex processes using software tools. With more than a decade of experience in the tech industry, he has honed his skills in Microsoft Excel and Outlook, as well as Google Sheets and Docs. Michael's blog is dedicated to sharing his knowledge and expertise with others, providing easy-to-follow tips and tutorials for improving productivity and efficiency. Whether you're a seasoned professional or a beginner, Michael's blog offers valuable insights and practical advice for getting the most out of these essential software tools.