如何在EXCEL的多个工作表批量插入返回目录的链接

发布网友 发布时间：2022-04-22 04:11

我来回答

共5个回答

热心网友 时间：2023-06-27 06:25

1．首先，准备需要插入“backtodirectory”按钮的工作簿，打开工作簿，并确保工作簿有一个目录或主表工作表的副本作为返回对象。如下图所示：

2．单击“开发工具”选项卡，然后单击“查看代码”按钮以打开VB代码编辑器窗口，如下图所示：

3．然后在“打开VB代码编辑”窗口中插入一个新模块，将以下代码复制到模块中，然后单击run，如下图：

4．运行代码后，最小化代码窗口并返回工作簿的主界面。您可以看到目录工作表，其他工作表已自动插入按钮以返回目录，如下图所示：

热心网友 时间：2023-06-27 06:25

1.打开excel文档，创建若干个sheet页,例如sheet1,a1,a2,a3等。

2.点击菜单中的开发工具菜单，点击查看代码按钮。

3.如果找不到开发工具菜单，请点击文件->选项->自定义功能区->主选项卡中，选中开发工具复选框。

4.录入以下下代码。目的是用来在sheet1页中的第一列生成sheet名字列

Sub createmulu()   

For i = 1 To Sheets.Count     

Cells(i, 1) = Sheets(i).Name   

Next   

End Sub

5.在代码编辑窗口中点击绿色运行按钮，或者按F5键，运行后sheet1如下图所示：

6.在sheet1中B2单元格中定义超链接函数，录入=HYPERLINK("#"&A2&"!A1",A2)。

7.鼠标选中B1单元格中，将鼠标放在单元中右下侧，当鼠标变为十字时，向下拖动鼠标。

8.此时点击B列的sheet名称超链接，即可打开相应的sheet页。

9.按shift键，选中除sheet1外的其他sheet页，在A1单元格中录入

=HYPERLINK("#sheet1!A1","返回目录")，然后回车。所有选中sheet页中便成功添加“返回目录”超链接。

热心网友 时间：2023-06-27 06:26

热心网友 时间：2023-06-27 06:26

热心网友 时间：2023-06-27 06:27