跳到主要内容

掌握 Excel:轻松取消隐藏所有工作表或多个工作表的终极指南

添加一名作者 最后修改时间:2024-04-22

Excel 的稳健性不仅在于其复杂的公式和数据透视表,还在于其有效组织和呈现数据的能力。该组织的一个重要部分是能够根据需要隐藏和取消隐藏工作表。无论您是希望简化工作簿的新手用户还是管理复杂数据集的高级用户,本指南都将为您提供轻松取消隐藏 Excel 工作表的知识。


手动一张一张地取消隐藏工作表

在 Excel 中取消隐藏工作表的最简单方法是手动执行,这在处理少量工作表时效果最佳。

1. 在 Excel 工作簿中, 右键单击 在 Excel 工作簿底部的任何可见工作表选项卡上。

2。 选择 取消隐藏 从上下文菜单。

3. 取消隐藏 将出现对话框,列出所有隐藏的工作表。选择您想要取消隐藏的工作表并单击 OK.

4. 然后就会显示所选的隐藏工作表。重复以上3步,将更多隐藏的工作表一一取消隐藏。

备注:

  • 除了右键单击上下文菜单之外,还可以通过功能区或快捷键访问“取消隐藏”对话框:
  • 从功能区访问:
    主页 标签,然后在 电池 组,点击 格式 > 隐藏与隐藏 > 取消隐藏工作表 打开 取消隐藏 对话。
  • 从 Excel 快捷键访问:
    媒体 ALT + H + O + U + H 键打开 取消隐藏 对话。
Tips:
  • 针对 非 Microsoft 365 用户,Excel 的取消隐藏选项仅允许您一次选择一张工作表。要取消隐藏多个或所有工作表,您必须分别对每个工作表重复上述步骤。
  • 然而,如果你是一个 Microsoft 365 用户,您可以在“取消隐藏”对话框中一次性取消隐藏多个 Excel 工作表。
    • 要选择多个工作表,请执行以下任一操作:
    • 按下并按住不动 按Ctrl 键,然后单击项目以选择它们。
    • 按下并按住不动 转移 键,然后使用向上和向下箭头键调整您的选择。
  • 如果您不是Microsoft 365用户,但想快速隐藏多个或全部工作表,请使用以下方法( Kutools for Excel方法 , VBA方法 自定义视图方法 )我们接下来会介绍。

🌟 立即将所有隐藏工作表切换为可见或不可见! 🌟

节省时间和精力 Kutools for Excel's 切换隐藏工作表可见性 特征! 🚀

随身携带 切换隐藏工作表可见性 Kutools for Excel 提供的按钮,您可以使用 一键 显示活动工作簿中的所有隐藏工作表,再次单击可将所有隐藏工作表切换为不可见。速度快如闪电! ⚡

📊 Kutools for Excel:增强 Excel 功能 超过300起 必不可少的工具。享受全功能 30 天免费试用,无需信用卡! 🚀

现在下载

一键取消隐藏所有工作表具有强大的功能 - Kutools for Excel

体验一键式便利 Kutools for Excel很强大 取消隐藏所有隐藏的工作表 特征。这个出色的工具使您只需单击一下即可轻松显示每个隐藏的工作表,从而绕过 Excel 默认“取消隐藏”选项所需的繁琐过程,该选项限制您一次只能取消隐藏一张工作表。告别每个工作表的繁琐重复步骤,并欢迎使用 Kutools for Excel 更有效、更省时的方法来管理您的 Excel 文档。

安装 Kutools for Excel,单击“ 库工具 > 首页 > 取消隐藏所有隐藏的工作表 使所有隐藏的工作表可见。

备注: 文本 (11 张) 函数旁边显示的表示工作簿中隐藏工作表的总数。如果没有隐藏工作表,该功能将显示为灰色。

结果

所有隐藏的工作表都会立即显示。

Tips:
  • 要使用此功能,您应该安装 Kutools for Excel 首先,请 点击下载并享受 30 天免费试用 现在。
  • 用于管理工作簿和工作表的定制方法,例如 有选择地显示特定工作表,而不是一次性显示所有工作表, Kutools for Excel 提供先进的 隐藏/取消隐藏工作簿和工作表 公用事业。此功能提供了根据您的特定需要轻松显示或隐藏工作簿和工作表组的灵活性。

使用 VBA 取消隐藏工作表


高级 Excel 用户或熟悉 Excel 编程功能的用户可以使用 VBA 取消隐藏工作表。此方法提供了灵活性,并且可以进行自定义以满足各种需求,例如取消隐藏所有工作表、多个工作表或名称中包含特定文本的工作表。

在本节中,我们将探讨三个 VBA 脚本,旨在满足取消隐藏工作表的三个不同要求。

取消隐藏所有工作表

此 VBA 脚本使工作簿中的所有工作表可见。

第 1 步:打开 VBA 模块编辑器并复制代码
  1. 按住 ALT + F11 键,然后打开 Microsoft Visual Basic应用程序 窗口。
  2. 点击 插页 > 模块 并将以下代码粘贴到 模块 窗口。
  3. VBA代码:取消隐藏所有工作表
    Sub UnhideAllSheets()
    'Updateby Extendoffice
        Dim ws As Worksheet
        For Each ws In ThisWorkbook.Worksheets
            ws.Visible = xlSheetVisible
        Next ws
    End Sub
第二步:执行代码得到结果

粘贴此代码后,请按 F5 键来运行此代码。所有隐藏的工作表将立即显示。


取消隐藏多个工作表(指定工作表)

此 VBA 脚本允许您取消隐藏指定工作表的列表。

第 1 步:打开 VBA 模块编辑器并复制代码
  1. 按住 ALT + F11 键,然后打开 Microsoft Visual Basic应用程序 窗口。
  2. 点击 插页 > 模块 并将以下代码粘贴到 模块 窗口。
  3. VBA代码:取消隐藏指定的工作表
    Sub UnhideSelectedSheets()
    'Updateby Extendoffice
        Dim sheetNames As Variant
        sheetNames = Array("Sheet5", "Sheet6") ' Customize the list with your sheet names
        Dim name As Variant
        For Each name In sheetNames
            Sheets(name).Visible = xlSheetVisible
        Next name
    End Sub
    

备注: 在这种情况下, Sheet5Sheet6 将被隐藏。您可以在代码中使用工作表名称自定义列表: sheetNames = Array("Sheet5", "Sheet6") 通过替换 “表 5”, “表 6” 与其他工作表名称。

第二步:执行代码得到结果

粘贴此代码后,请按 F5 键来运行此代码。以及指定的隐藏工作表(Sheet5Sheet6) 将立即显示。


取消隐藏工作表名称中包含特定文本的工作表

要根据名称中的特定文本取消隐藏工作表,请使用以下 VBA 脚本。

第 1 步:打开 VBA 模块编辑器并复制代码
  1. 按住 ALT + F11 键,然后打开 Microsoft Visual Basic应用程序 窗口。
  2. 点击 插页 > 模块 并将以下代码粘贴到 模块 窗口。
  3. VBA代码:取消隐藏工作表名称中具有特定文本的工作表
    Sub UnhideSheetsWithSpecificText()
    'Updateby Extendoffice
        Dim ws As Worksheet
        For Each ws In ThisWorkbook.Worksheets
            If InStr(ws.Name, "Excel") > 0 Then
                ws.Visible = xlSheetVisible
            End If
        Next ws
    End Sub

备注:在这种情况下,工作表包含 Excel 将显示名称中的内容。要取消隐藏名称中包含其他特定文本的工作表,您可以修改提供的代码 如果 InStr(ws.Name, "Excel") > 0 那么 通过替换 “Excel” 与所需的文本。

第二步:执行代码得到结果

粘贴此代码后,请按 F5 键来运行此代码。以及带有文字的隐藏纸张 Excel 中的名称将立即显示。


使用自定义视图取消隐藏所有工作表

Excel 中的自定义视图允许您在所有工作表可见时保存工作簿的视图,从而避免一张一张取消隐藏工作表的麻烦。本质上,当所有内容都可见时,您可以拍摄工作簿的快照。然后,如果您隐藏任何工作表,只需单击一下即可轻松返回到所有工作表都可见的初始状态。 因此,为了获得最佳结果,请在工作开始时、隐藏任何工作表之前设置此自定义视图.

第 1 步:确保所有工作表都可见

在创建自定义视图以取消隐藏所有工作表之前,必须首先确保工作簿中的所有工作表均可见。

备注:如果您不知道工作簿中是否有隐藏工作表,请参阅本节末尾的指南: 如何检查工作簿是否包含隐藏工作表?

第 2 步:导航到自定义视图

首页 功能区上的选项卡。在里面 工作簿视图 群,点击 自定义视图.

第 3 步:创建新的自定义视图
  1. 自定义视图 对话框中,单击 添加 按钮。
  2. 新增检视 对话框中,输入自定义视图的名称,例如 所有工作表可见。 点击 OK.
  3. 第 4 步:使用自定义视图

    每当您需要取消隐藏工作簿中的所有工作表时,只需返回到 首页 标签,点击 自定义视图,选择您创建的视图(例如, 所有工作表可见),然后单击 展示。这将立即将您的工作簿恢复到所有工作表都可见的状态。

    如何检查工作簿是否包含隐藏工作表?

    要快速识别 Excel 工作簿中的任何隐藏工作表,请按照以下简化步骤操作:

    1. 右键单击 在 Excel 窗口底部可见的任何工作表选项卡上。此操作将提示出现上下文菜单。
    2. 在此菜单中,将您的注意力集中到 取消隐藏 选项。
      • 如果 取消隐藏 选项处于活动状态(意味着它没有灰显),这表明工作簿中存在隐藏工作表。您可以单击它来查看并选择您希望使其可见的任何隐藏工作表。
      • 相反,如果 取消隐藏 选项处于非活动状态(灰显),它确认工作簿不包含任何隐藏工作表。

    此方法是快速确定工作簿是否隐藏任何工作表的最直接方法。然而这个方法并没有显示 非常隐藏的床单。 至 查看和取消隐藏非常隐藏的工作表,使用以下方法。


使用 Kutools for Excel 轻松取消隐藏所有非常隐藏的工作表

查看和取消隐藏工作表设置为 非常隐蔽 在 Excel 中——这种状态使得它们无法通过通常的 Excel 界面访问——Kutools for Excel 提供了一个有效的解决方案。这 隐藏/取消隐藏工作簿和工作表 该功能使您能够管理比标准隐藏设置允许的隐藏更深的工作表,而无需复杂的 VBA 脚本。它使您能够毫不费力地 显示所有隐藏的工作表,包括标记为非常隐藏的工作表,并提供选项 仅取消隐藏隐藏的工作表或仅取消隐藏非常隐藏的工作表。以下是如何取消隐藏 Kutools 隐藏的所有工作表。

安装 Kutools for Excel, 选择 库工具 > 首页 > 隐藏/取消隐藏工作簿和工作表。 在 隐藏/取消隐藏工作簿和工作表 对话框中,选中每个复选框 非常隐蔽 工作表列表中的工作表以显示它们。

您可以看到非常隐藏的工作表立即取消隐藏。根据需要关闭对话框。

备注:那个 取消隐藏所有工作表,包括隐藏工作表和非常隐藏的工作表, 你只需要点击 全部取消隐藏 按钮在 隐藏/取消隐藏工作簿和工作表 对话框。然后所有的单子就一口气显示出来了!

Tips::要使用此功能,您应该安装 Kutools for Excel 首先,请 点击下载并享受 30 天免费试用 现在。


为什么不能取消隐藏工作表? - 问题及解决方案


尝试在 Excel 中取消隐藏工作表时遇到问题可能会令人沮丧。这些问题通常是由一些常见场景引起的。了解这些问题及其解决方案可以帮助您有效地管理 Excel 工作簿。以下是常见问题及其解决方案的细分:

1.工作表设置为非常隐藏

问题:

Excel 允许将工作表设置为 非常隐蔽,这意味着无法通过常用的 Excel 界面选项取消隐藏它们。

解决方法:

您可以使用 VBA 更改这些工作表的可见性状态。按访问 VBA 编辑器 ALT + F11 键,找到有问题的工作簿和工作表,然后设置工作表的 可见 财产 xlSheetVisible。或者,像这样的工具 Kutools for Excel 提供 一种更用户友好的方式来取消隐藏非常隐藏的工作表 无需编写代码。


2. 工作簿保护

问题:

如果工作簿受保护,您可能无法进行更改,包括取消隐藏工作表。

解决方法:

您需要删除工作簿保护。这通常需要用于保护工作簿的密码。一旦取消保护,您应该能够正常取消隐藏工作表。如果您不知道密码,请阅读: 如何取消保护工作簿中没有密码的所有受保护工作表?


3.工作表实际上并没有被隐藏

问题:

有时,工作表可能看起来是隐藏的,而实际上它们并不存在于工作簿中。

解决方法:

要了解工作簿中是否有隐藏工作表,请参阅本文中的指南: 如何检查工作簿是否包含隐藏工作表?


4. Excel版本及兼容性问题

问题:

较旧版本的 Excel 或不同版本之间的兼容性问题可能会影响您取消隐藏工作表的能力。

解决方法:

确保您使用的 Excel 版本支持工作簿中的功能。如果您在旧版本的兼容模式下工作,请考虑升级文件并以较新的格式保存文件。确保所有需要工作簿的用户都可以访问 Excel 的更新版本,以保持功能和兼容性。

总而言之,我们探索了多种在 Excel 中取消隐藏工作表的方法,从手动步骤到使用 Kutools for Excel 和 VBA 脚本......有了这些工具,您可以使用这些工具,让您的电子表格保持井井有条,让您的数据始终触手可及。如果您想探索更多 Excel 提示和技巧, 请点击这里 访问我们广泛收集的超过数千个教程。

Comments (41)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
سهلت علي الكثبر
اقدر لك ذلك
شكرا لك
Rated 5 out of 5
This comment was minimized by the moderator on the site
it is showing "he Worksbook structure is password protected.!! How to proceed further?
This comment was minimized by the moderator on the site
Nice but can't scroll using mouse wheels. Very bad UX.
This comment was minimized by the moderator on the site
Thanks a Lot for Sharing VB COde
This comment was minimized by the moderator on the site
This is very helpful. Thanks! Is there VBA code I can use to unhide all hidden rows/columns across all tabs at once?
This comment was minimized by the moderator on the site
this thread is very helpful. Thanks!
This comment was minimized by the moderator on the site
Nice Job!!!! I unhide all sheets in one shot!!! cool!!!!! Tkz Unhide multiple sheets!!!! Unhide all hidden worksheets by VBA code The following short VBA code also can help you display all of the hidden sheets at the same time. 1. Hold down the Alt + F11 keys in Excel, and it opens the Microsoft Visual Basic for Applications window. 2. Click Insert > Module, and paste the following macro in the Module Window. Sub UnhideAllSheets() Dim ws As Worksheet For Each ws In ActiveWorkbook.Worksheets ws.Visible = xlSheetVisible Next ws End Sub 3. Press the F5 key to run this macro. And the hidden sheets will be displayed at once.
This comment was minimized by the moderator on the site
Is there a faster way than just pasting that code ?
This comment was minimized by the moderator on the site
Awesome! I was looking; "how to unhide all sheets in excel at once" and I've learned to getting things done the right way. Thank you so much.
This comment was minimized by the moderator on the site
This was great...Took seconds to copy and paste the code and nano-seconds to unhide 30 sheets.. Thanks
There are no comments posted here yet
Load More
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations