在一张EXCEL工作簿中有若干张工作表，乃至几十张，如果我们想给工作簿中所有的工作表生成一个目录，该如何操作呢？是将每一个工作表的sheet名称进行复制，然后再粘贴到一张表上吗？NO ！NO ！NO！
今天教你另外一种方法
首先在工作簿中插入一个sheet,命名为"目录"
在生成目录之前，还需要进行一次命名来获取工作表的名称
"公式"---"定义名称"---弹出"新建名称"对话框，输入"名称"，在引用位置中输入公式
=INDEX(GET.WORKBOOK(1),ROW(A1))&T(NOW())，单击"确定"按钮
完成之后，在"公式"---"名称管理器"中即可看到命名的名称及引用的位置
制作目录
在B1单元格中输入公式
=IFERROR(HYPERLINK(目录&"!A1",MID(目录,FIND("]",目录)+1,100)),"")并向下拖动填充即可自动生成目录,并且为超链接
在对工作表的sheet进行增减或删除时，目录也会随之自动进行更新
制作"返回目录"按钮
按，选中除"目录"外的其他sheet页，在E1单元格中录入
=HYPERLINK("#目录!A1","返回目录"),然后回车。所有选中sheet页中便成功添加"返回目录"超链接。
这样目录就做好了，最后就是保存
保存时，会弹出警告对话框，请点击"是"，将文件保存为启用宏的工作簿，否则，下次打开文件时，目录会失效。
公式解析
GET.WORKBOOK(1)是宏表函数，以[Book1.xls]Sheet1的形式返回工作簿中所有工作表名的水平数组。ROW(A1)在向下填充时会变成ROW(A2)、ROW(A3)，从而得到行号1，2，3……
INDEX(GET.WORKBOOK(1),ROW(A1))&T(NOW())，获取工作簿中所有工作表的名称。
&T(NOW())是因为T(NOW())=""，不影响公式结果，可以使工作表改名或增加、删除工作表时，公式能自动重新计算。
=IFERROR(HYPERLINK(目录&"!A1",MID(目录,FIND("]",目录)+1,100)),"")
用"MID(目录,FIND("]",目录)+1,100)"提取工作表名称，表示从"]"之后开始提取100个字符，一般的工作表名称没有这么长，这里写100足够用了。
HYPERLINK是链接函数，第一个参数表示链接的位置，第二个表示要"显示的文字"。
FERROR去掉空值