用户69288570
制作目录我们采用的是vba加函数的方式进行目录的设置，使用vba获取工作表名称，然后利用函数制作超链接，非常简单，下面就跟我来一起操作下吧
1.新建工作表
首先我们需要新建一个工作表将它放在excel文件的第一个位置，并将A1单元格的值命名为目录
2.提取工作表名称
点击开发工具，然后点击visual basic打开vba编辑器，我们点击后面括号里面有工作薄名称的工程，然后点击插入，选择插入模块，然后双击模块，输入如下代码，然后按F5运行提取工作表名称
Sub 提取工作表名称()
Dim i As Integer '将i定义为整数
For i = 2 To Sheets.Count '将i赋值让他等于2到工作表个数
Cells(i, 1) = Sheets(i).Name '让单元格的值等于工作表名称的值
Next '结束循环
End Sub
3.创建连接
输入公式：=HYPERLINK("#'"&A2&"'!A1\
Excel从零到一
怎样在Excel中为多个工作表创建目录？
1、 批量填充公式
选定一个工作后点击鼠标右键，选定所有工作表,选择一个空单元格比如a1中输入=XFD1后按回车,这样所有工作表中的a1单元格中都会填充公式
2、点击文件——信息——检查问题——检查兼容性——删除不需要的文字
此时的目录就创建好了，文件名都是是带有连接的，点击之后即可快速跳转
3、为每张工作表创建返回目录的链接，选定所有工作表后在任意一单元格中输入公式=HYPERLINK("#目录!a1\
Excel办公小动画
有时候工作表非常多，比如超过10个的话，要一个个去切换工作表非常麻烦，还需要拖动滚动条去找。而如果为所有工作表创建一个索引目录的话，就可快速定位工作表，直接点击名称即可跳转到相应的工作表中。如下图所示。
制作步骤如下：
首先在所有工作表之前新建一个名为“目录”的工作表。然后切换到【开发工具】菜单，如果没有的话需要在【文件】菜单下找到【选项】【自定义功能区】，然后勾选【开发工具】菜单项即可。
紧接着，点击【开发工具】菜单下的【Visual Basic】，打开VBA代码编辑窗口，输入如下一段代码。
Sub MuLu()
For i = 2 To Worksheets.Count
Worksheets("目录").Cells(i - 1, 1) = Worksheets(i).Name
ActiveSheet.Hyperlinks.Add anchor:=Cells(i - 1, 1), _
Address:="\
师说新语
“在Excel中为多个工作表创建目录”的操作步骤是：
1、打开Excel工作簿；
2、由已知条件可知，工作簿由多个工作表组成，需要在“目录”工作表中，形成目录，将并无规则的工作表名依次罗列在“目录”工作表中，且点击表名，可实现跳转；
3、选择“目录”工作表的B1单元格，在“公式”选项下的“定义名称”，在名称中输入：名称，在引用位置中输入：=INDEX(GET.WORKBOOK(1),ROW(A1))&T(NOW())，确定，完成自定义名称；
GET.WORKBOOK为宏表函数，用于提取当前工作簿中的所有工作表名
4、在B2单元格输入以下公式
=IFERROR(HYPERLINK(名称&"!A1\
人力资源专家杨少侠
比较简单原始的方法：2第1步 文档说明：下面文档共有17个sheet页，其中sheet2~sheet17是内容页，sheet1作为目录页，根据内容页数量在目录页建立序号01~16，3第2步 选中B2单元格，同时按住键盘上的“Ctrl+k”，弹出【插入超链接】，如下图：4第3步 选择“本文档中的位置”，用鼠标选中“第一章”，单击确定，如下图：5第4步 重复以上步骤，完成所有目录链接
