跳到主要内容

列出 Excel 工作簿中所有工作表名称的 4 种有效方法

作者:孙 最后修改时间:2024-05-27

在大型 Excel 工作簿中浏览众多工作表可能会很麻烦,尤其是当您需要快速概览所有可用工作表时。本文探讨了四种实用方法来列出工作簿中的所有工作表名称,从而提高工作效率和工作簿组织。


列出工作簿中的所有工作表名称

 

本教程介绍了列出工作簿中所有工作表的四种有效方法。选择最适合您需求的方法并按照分步说明高效地完成任务。


使用复制和粘贴(手动)

列出所有工作表名称的最简单方法涉及手动过程:

第 1 步:打开一个新工作簿
步骤 2:双击要复制的工作表选项卡

步骤3:按Ctrl + C键复制工作表名称
步骤 4:单击单元格并按 Ctrl + V 粘贴工作表名称

第五步:重复上述步骤,将所有工作表选项卡名称一一复制粘贴到工作簿中

此方法对于几个工作表名称效果很好,但对于数十个工作表会变得耗时。对于较大的工作簿,请考虑下面描述的更有效的方法。


使用 Kutools for Excel (简单,工作表名称可链接)

Kutools for Excel's 创建工作表名称列表 通过快速生成工作表名称的链接列表来增强 Excel。此功能会自动为每个工作表创建超链接,只需单击即可直接导航,非常适合管理大型工作簿。它在效率和易用性方面超越了Excel的手动方法。

下载Excel的Kutools 今天就简化您的工作簿管理并提高工作效率。

点击 Kutools 加 > 工作表 > 创建工作表名称列表,在弹出的对话框中指定设置:

  1. 选择索引样式;

  2. 为新工作表命名,其中将列出工作表名称;

  3. 指定新工作表的位置;

  4. 决定如何放置工作表名称;

  5. 点击 OK.

超链接列表 列表按钮和宏

然后,您可以通过右键单击工作表选项卡,然后从上下文菜单中选择“移动”或“复制”,将这个新工作表复制到新工作簿中。

为了快速查看和在工作表之间轻松导航,Kutools for Excel's 导航窗格 非常有效。它不仅将所有工作表名称列出为可单击的链接以方便访问,而且还显示所有打开的工作簿,以便于在它们之间快速切换。


使用名称范围(在新工作表中列出)

在 Excel 中,您可以通过创建命名范围来高效地列出新工作表中的所有工作表名称。

第 1 步:单击“公式”>“定义名称”

步骤 2:在“新名称”对话框中编辑名称和公式
  • 名称:为名称范围输入一个名称

  • :将下面的公式复制并粘贴到其中

    =REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),"")
  • 点击 OK.

步骤 3:使用公式列出工作表名称

在单元格中输入下面的公式,然后按 输入 键获取所有工作表名称。

=TRANSPOSE(ListNames)

ListNames 是您在上述步骤中为名称范围指定的名称。

备注:此方法无法列出新工作簿中的工作表名称。

使用VBA(不稳定)

更高级和可定制的方法涉及编写 VBA 脚本来提取和列出工作表名称:

步骤 1:打开要列出其工作表名称的工作簿
步骤 2:按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口
第三步:点击插入模块

第 4 步:将以下代码复制并粘贴到模块中
Sub ListSheetNamesInNewWorkbook()
'UpdatebyExtendoffice
    Dim wbSource As Workbook
    Dim wbTarget As Workbook
    Dim wsTarget As Worksheet
    Dim i As Integer
    
    ' Reference the current workbook
    Set wbSource = ActiveWorkbook
    
    ' Create a new workbook
    Set wbTarget = Workbooks.Add
    Set wsTarget = wbTarget.Sheets(1)
    
    ' List all sheet names from the active workbook in the new workbook
    For i = 1 To wbSource.Sheets.Count
        wsTarget.Cells(i, 1).Value = wbSource.Sheets(i).Name
    Next i
    
    ' Cleanup
    Set wbSource = Nothing
    Set wbTarget = Nothing
    Set wsTarget = Nothing
End Sub

第5步:按F5键或单击运行按钮运行代码

现在打开一个新工作簿以列出所有工作表名称。


每种方法根据您的需求提供不同的优势 - 从简单的手动列表到更复杂的解决方案(例如 Kutools 或 VBA)。选择最适合您工作流程的一种,以有效管理和浏览您的 Excel 工作表。有关更多 Excel 提示和技巧,!敬请关注我们的博客.


最佳办公效率工具

Kutools for Excel-帮助您从人群中脱颖而出

🤖 Kutools 人工智能助手:基于以下内容彻底改变数据分析: 智能执行   |  生成代码  |  创建自定义公式  |  分析数据并生成图表  |  调用 Kutools 函数...
热门特色: 查找、突出显示或识别重复项  |  删除空白行  |  合并列或单元格而不丢失数据  |  不使用公式进行四舍五入 ...
超级VLookup: 多重标准  |  多重价值  |  跨多页  |  模糊查询...
副词。 下拉列表: 简易下拉列表  |  依赖下拉列表  |  多选下拉列表...
列管理器: 添加特定数量的列  |  移动列  |  切换隐藏列的可见性状态  将列与 选择相同和不同的单元格 ...
特色功能: 网格焦点  |  设计图  |  大方程式酒吧  |  工作簿和工作表管理器 | 资源库 (自动文本)  |  日期选择器  |  合并工作表  |  加密/解密单元格  |  按列表发送电子邮件  |  超级筛选  |  特殊过滤器 (过滤粗体/斜体/删除线...)...
前 15 个工具集12 文本 工具 (添加文本, 删除字符 ...)  |  50+ 图表 类型 (甘特图 ...)  |  40+ 实用 公式 (根据生日计算年龄 ...)  |  19 插入 工具 (插入二维码, 从路径插入图片 ...)  |  12 转化 工具 (小写金额转大写, 货币兑换 ...)  |  7 合并与拆分 工具 (高级组合行, 拆分 Excel 单元格 ...)  |  ... 和更多

Kutools for Excel 拥有超过 300 个功能, 确保只需点击一下即可获得您所需要的...

描述


Office 选项卡 - 在 Microsoft Office(包括 Excel)中启用选项卡式阅读和编辑

  • 一秒钟即可在数十个打开的文档之间切换!
  • 每天为您减少数百次鼠标单击,告别鼠标手。
  • 查看和编辑多个文档时,可将您的工作效率提高50%。
  • 为 Office(包括 Excel)带来高效的选项卡,就像 Chrome、Edge 和 Firefox 一样。
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How do I revers this this? I have a list of fifty different names I need to enter on the tabs of 50 worksheets (all on the same workbook). Is there a macros formula I can use to accomplish this? I'm trying to not manually enter 50 names on tabs/worksheets. I know how to get the tab names to form a list on a separate sheet, how do I reverse that? Thank you
There are no comments posted here yet
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations