一、excel怎么制作目录
你好
当Excel中的工作表数量很多时，有一个链接的目录真是太方便了
如果用最常见的方法，要定义名称 + 长长的Excel公式。制作这个目录对新手还是有点难度。
定义名称：Shname
=MID(GET.WORKBOOK(1),FIND("]",GET.WORKBOOK(1))+1,99)&T(NOW())
输入并复制以下公式
=IFERROR(HYPERLINK("#'"&INDEX(Shname,ROW(A1))&"'!A1",INDEX(Shname,ROW(A1))),"")
今天小编分享一个非常简单的Excel目录制作方法（适合2003以上版本）
操作步骤：
1、输入公式
全选所有表，在前面添加一空列。然后在单元格A1中输入公式 =xfd1
2、生成超链接列表
文件 - 信息 - 检查兼容性 - 复制到工作表，然后Excel会插入一个内容检查的工作表，并且在E列已自动生成带链接的工作表名称。
3、制作目录表
把带链接的工作表名称列表粘贴到“主界面”工作表中，替换掉'!A1，稍美化一下，目录效果如下：
4、制作返回主界面的链接
全选工作表 - 在任一个表的A1输入公式（会同时输入到所有表中）
=HYPERLINK("#主界面!A1","返回主界面")
注:HYPERLINK函数可以在Excel中用公式生成超链接
完工！
这个方法的原理是输入让03版无法兼容的公式（03版没有XDF列），然后检查功能诱使Excel把所有工作表名列出来。
二、如何在EXCEL中生成目录
打开要创建目录的EXCEL文件--------Alt+F11---------插入--------模块--------把下面的代码拷贝到模块中Sub mulu()On Error GoTo Tuichu
Dim i As Integer
Dim ShtCount As Integer
Dim SelectionCell As Range
ShtCount = Worksheets.Count
If ShtCount = 0 Or ShtCount = 1 Then Exit Sub
Application.ScreenUpdating = False
For i = 1 To ShtCount
If Sheets(i).Name = "目录" Then
Sheets("目录").Move Before:=Sheets(1)End IfNext iIf Sheets(1).Name < "目录" Then
ShtCount = ShtCount + 1
Sheets(1).SelectSheets.AddSheets(1).Name = "目录"End IfSheets("目录").Select
Columns("B:B").Delete Shift:=xlToLeft
Application.StatusBar = "正在生成目录…………请等待！"
For i = 2 To ShtCount
ActiveSheet.Hyperlinks.Add Anchor:=Worksheets("目录").Cells(i, 2), Address:="", SubAddress:= _
Sheets(i).Name & "!R1C1", TextToDisplay:=Sheets(i).NameNextSheets("目录").Select
Columns("B:B").AutoFit
Cells(1, 2) = "目录"
Set SelectionCell = Worksheets("目录").Range("B1")
With SelectionCell
.HorizontalAlignment = xlDistributed
.VerticalAlignment = xlCenter
.AddIndent = True
.Font.Bold = True
三、excel表格制作怎么做目录
打开excel工作簿，点击“公式”下的“名称管理器”，接着点击“新建”。
输入名称“我的目录”，和引用位置“=INDEX(GET.WORKBOOK(1),ROW(A1))&T(NOW())”，点击“确定”。
这样就会返回名称管理器窗口，并可以在窗口中看到该名称，关闭该名称管理器窗口。
在单元格中输入公式“=IFERROR(HYPERLINK(我的目录&"!A1",MID(我的目录,FIND("]",我的目录)+1,50)),"")”。
向下填充公式，这样就可以得到工作簿中所有的工作表名称，且每个名称下都有链接。
将步骤5得到的目录复制到每个工作表下，这样就可以在各个工作表中任意切换目录了。
最后，一定要将excel文件保存为“Excel启用宏的工作簿(*.xlsm）”。
