Hello,大家好，今天跟大家分享下如何制作excel的工作表目录，特别适合工作表比较多的同学，我们采用的是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",A2)

公式解析

第一参数："#'"&A2&"'!A1"

# 表示引用的工作表在当前工作簿中

'"&A2&"'! 表示 A2 对应的工作表，就是提取的工作表名称

A1 表示的是每个工作表对应的A1单元格。Hyperlink 函数必须要具体链接到工作表中的某一单元格

第二参数：A2，返回工作表名称

设置完成后直接向下填充即可,然后我们隐藏掉提取的目录名称即可