有必要为包含许多工作表的工作簿创建目录。 这里我们有一个在 Excel 工作表中创建目录的快速方法。
在上一篇文章中 如何通过超链接在 Excel 中创建目录，我们已经讨论了通过在工作表中插入超链接来创建目录。 为包含许多工作表的工作簿创建目录可能非常有用。 但是手动添加一个超链接可能很耗时。 因此，这里我们有一个新的方法可以快速创建这样一个目录。
创建目录
在下图中，工作簿中有许多工作表。
现在您可以在此工作簿中创建目录。
- 右键单击功能区中的选项卡之一。
- 然后单击菜单中的“自定义功能区”按钮。
- 在“Excel选项”窗口中，勾选“主选项卡”区域中的“开发人员”选项。
- 然后单击“确定”。
- 现在单击功能区中的“开发人员”选项卡。
- 然后单击工具栏中的“Visual Basic”按钮。
这样，您就打开了 Visual Basic 编辑器。 其实你也可以通过键盘上的快捷键“Alt+F11”来快速打开编辑器。
- 现在右键单击 VBA 投影仪。
- 然后将光标移到“插入”选项上。
- 在子菜单中，选择“模块”选项。
因此，您已将一个新模块插入到项目中。
- 现在将以下 VBA 代码复制到新模块中：
子创建菜单()
昏暗为整数
a = 1
'添加一个新的工作表
Worksheets.Add Before:=工作表(1)
Sheets(1).Name = “菜单”
工作表（“菜单”）。范围（“A1”）。值=“菜单”
对于 a = 2 To ActiveWorkbook.Worksheets.Count
Worksheets(“Menu”).Range(“A” & a) = Sheets(a).Name
ActiveSheet.Hyperlinks.Add Anchor:=Worksheets(“Menu”).Range(“A” & a), _
地址：=”, _
SubAddress:=”'” & Sheets(a).Name & “'!R1C1”, _
TextToDisplay:=Sheets(a).名称
下一篇
END SUB
在此代码中，我们在开头插入一个名为“Menu”的新工作表。 如果已经有名为“菜单”的工作表，您可以更改 VBA 代码或更改现有工作表名称的名称。 此外，我们将在新工作表的第一列中输入列表。 如果需要输入不同范围的目录，也可以根据自己的需要进行修改。
- 现在按下工具栏中的“Run Sub”按钮
此外，您还可以按键盘上的“F5”键。
- 现在回到工作表界面。
工作簿中有一个名为“菜单”的新工作表。 并且所有工作表名称都在工作表中列出，并带有相应的超链接。 通过这种方法，您可以快速轻松地创建目录。
两种方法的比较
在上一篇文章中 如何通过超链接在 Excel 中创建目录，我们手动添加目录。 我们将在下表中比较两种方法的区别。
| 对比 | 手动创建目录 | 使用 VBA 过程 |
| 企业优势 | 1.每个Excel用户都可以轻松使用此方法。
2.如果你对VBA没有任何了解，你可以使用这个方法。 |
1、通过VBA程序，您可以一键完成此任务。
2. 您还可以更改 VBA 代码以满足其他要求。 |
| 坏处 | 1、如果工作簿中的工作表很多，你肯定会花很多时间在插入超链接上。
2. 需要一个一个选择超链接，这样很容易出错。 |
1、如果不熟悉VBA代码，运行代码时会遇到问题。
2. 使用VBA 代码会使任务复杂化。 |
在 Excel 中处理意外情况
如果您经常使用 Excel 完成任务，难免会遇到一些错误。大多数情况下，您可以退出 Excel 然后重新启动，这样这些小错误就会消失。然而，Excel 中的某些错误会导致严重的程序损坏，其后果不堪设想。此时，您可以…… 修复xls数据问题 通过我们熟练的工具。 在这个有效工具的帮助下，您唯一需要做的就是等待恢复过程完成。
作者简介：
Anna Ma 是一位数据恢复专家 DataNumen, Inc.，它是数据恢复技术领域的世界领先者，包括 修复文档数据损坏 和 outlook 修复软件产品。 欲了解更多信息，请访问 datanumen.com