怎样为excel的每个工作表插入目录超链接

请参考如下步骤在第一个工作表自动批量生成指向后续各个工作表的超链目录：

1、把光标放在第一个工作表希望插入目录的地方；

2、键入Alt+F11打开VBA编辑器，然后选择菜单“插入-模块”；

3、在代码编辑区粘贴如下代码：

OptionExplicit

SubAutoGenerateHyperlinks()

DimnIndexAsInteger
DimoRangeAsRange

FornIndex=2ToSheets.Count
SetoRange=Cells(Selection.Row+nIndex-2,Selection.Column)
oRange.Hyperlinks.AddAnchor:=oRange,Address:="",SubAddress:=Sheets(nIndex).Name&"!A1",TextToDisplay:=Sheets(nIndex).Name
Next

EndSub

4、键入F5运行，再键入Alt+F11切换回第一个工作表，检查目录超链是否自动建立成功。