如何在Excel中插入目录

步骤1：假设一个excel工作薄中的两张表，分别为sheet1和sheet2，下面分别以表1和表2来代替。我们要把表2中的语文成绩导入到表1中；
步骤2：选中表1，选中c2单元格，即语文项目中第一个要录入的成绩。选择“插入—函数”命令
步骤3：在“或选择类别”中选择“查找与引用”；
步骤4：在对应的“选择函数”中选择“vlookup”，点击确定；
步骤5：在出现的“函数参数”面板点击第一个选项箭头处的按钮；
步骤6：点击“张三”名字，即“a2”单元格，表示我们要查找“张三”的成绩，点击上面的按钮回到面板上；
步骤7：点击第二个选项箭头处的按钮；
步骤8：选中表2，同时选择a列和b列，然后点击上面的按钮；
步骤9：因为在表2中语文成绩在第二列，所以第三项我们填入数字“2”；
步骤10：第四项我们直接填入“0”即可，点击确定；
步骤11：我们看到表1中张三的语文成绩出现了数值，该数值与表2相同；
步骤12：选中c2单元格，用填充柄下拉，所有的语文成绩就从表2填入表1中去了

这是word干的事，excel偏重于数据处理。excel也没有提供该功能。
建议word弄好再粘过来。
祝你成功！

效果：

点击相应名称的单元格，进入相应的表（注意：单元格内输入名称与工作表名称要完全相符）

代码：

Sheet1(目录)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Count > 1 Then Exit Sub '如果选择一个区域，不运行下面的代码，退出程序
If Intersect(Target, Range("c4:i8")) Is Nothing Then Exit Sub '如果选择的单元格不在 C4:I8 范围内，退出程序
If Target = "" Then Exit Sub '如果单元格为空，退出程序

Sheets(Target.Value).Activate '激活相同名称的工作表

End Sub

http://user.qzone.qq.com/260707077/infocenter?ptlang=2052&ADUIN=260707077&ADSESSION=1272585455&ADTAG=CLIENT.QQ.2587_Mysrv.0