如何在Excel中创建工作表名称的动态列表？-英雄云拓展知识分享

如何在Excel中创建工作表名称的动态列表？

如果一个工作簿中有多个工作表，并且要在该工作簿的新工作表中创建所有工作表名称的动态列表，该怎幺办？ 现在，本教程介绍了一些技能，可以在Excel中快捷完成此任务。

使用定义内涵名称和公式创建工作表名称的动态列表

使用VBA代码创建工作表名称的动态列表

使用tools for Excel创建工作表名称的动态列表

使用tools for Excel显示工作表名称的动态列表

使用定义内涵名称和公式创建工作表名称的动态列表

1.在空白工作表当选择一个单元格，在这里我选择A1，然后单击 公式 > 定义内涵名称。 看截图：

2.然后在 新名字 对话框，输入 表 进入 姓名 文本框（您可以针对需要进行更改），然后键入此公式 = SUBSTITUTE（GET.WORKBOOK（1），“ [”＆GET.WORKBOOK（16）＆“]”，“”） 进入“援用”文本框。 看截图：

3。 点击 OK。 转到所选单元格（A1）并键入此公式 = INDEX（Sheets，ROWS（$ A $ 1：$ A1）） （A1是您键入此公式的单元格，“ Sheets”是您在第2步中定义内涵的名称），然后向下拖动自动填充手柄，直到#REF！ 出现。

尖端：如果删除或添加了工作表，则需要转到A1并按Enter键，然后再次拉动自动填充手柄。

使用VBA代码创建工作表名称的动态列表

如果要创建可以链接到每一个工作表的工作表名称的动态列表，则可使用VBA代码。

1.创建一个新的工作表，并将其重命名为Index。 看截图：

2.右键单击索引的工作表名称，选择 查看代码 从上下文菜单中。 看截图：

3.在弹出的窗口中，将下面的VBA代码复制并粘贴到其中。

VBA：创建工作表名称的动态列表。

Private Sub Worksheet_Activate()
'Updateby20150305
Dim xSheet As Worksheet
Dim xRow As Integer
Dim calcState As Long
Dim scrUpdateState As Long
Application.ScreenUpdating = False
xRow                       = 1
With Me
.Columns(1).ClearContents
.Cells(1, 1) = "INDEX"
.Cells(1, 1).Name = "Index"
End With
For Each xSheet In Application.Worksheets
If xSheet.Name <> Me.Name Then
xRow                     = xRow + 1
With xSheet
.Range("A1").Name = "Start_" & xSheet.Index
.Hyperlinks.Add anchor: = .Range("A1"), Address: = "", _
SubAddress:             = "Index", TextToDisplay: = "Back to Index"
End With
Me.Hyperlinks.Add anchor: = Me.Cells(xRow, 1), Address: = "", _
SubAddress: = "Start_" & xSheet.Index, TextToDisplay: = xSheet.Name
End If
Next
Application.ScreenUpdating = True
End Sub

4。 点击 跑 or F5 要运行VBA，现在将创建工作表名称的动态列表。

小提示:

1.删除或插入工作簿的工作表后，工作表名称列表将自动更改。

2.您可以单击名称列表的工作表名称以转到工作表。

上面的两类方法不够方便，如果您对新实用程序感兴趣，则可使用以下两类方法，这可能会使此任务更加容易。

使用tools for Excel创建工作表名称的动态列表

 如果只想快捷列出工作簿的所有工作表名称并将其链接到原始工作表，则可使用 Excel的tools“ 创建工作表名称列表.

后 免费安装 tools for Excel，请履行以下操作：

1。 点击 tools 加 > 下载学习单 > 创建工作表名称列表。 看截图：

2。 在里面 创建工作表名称列表 对话：

3。 点击 Ok。 现在您可以看到工作表名称已列出。

提示：

1.您可以单击工作表名称以快捷切换到其原始工作表。

2.列表或工作表名称不能随插入或删除工作表而动态更改。

3.事实上，您还可以创建一个按钮列表来链接相干工作表，只需要检查一下便可 包括按钮和宏 在对话框中。 参见screeshshot：

单击此处以了解有关创建图纸名称列表的更多信息。

  创建工作表名称的可点击列表