求助excel大神,excel表中如何批量超链接,和批量新建表
发布网友
发布时间：2022-04-23 10:20
共3个回答
热心网友
时间：2023-06-21 20:11
1.宏3.0取出各工作表的名称，方法：
ctrl+f3出现自定义名称对话框，取名为X，引用位置栏输入：
=MID(GET.WORKBOOK(1),FIND("]",GET.WORKBOOK(1))+1,100)
确定
2.HYPERLINK函数批量插入连接，方法：
插入目录表格（一般为第一个sheet）
在A2单元输入公式=HYPERLINK("#'"&INDEX(X,ROW())&"'!A1",INDEX(X,ROW()))
A2单元向下填充，直到出错为止，目录就生成了。
注：=HYPERLINK("#'"&INDEX(X,ROW())&"'!A1",INDEX(X,ROW()))
这个公式中，从左到右的引号顺序是，双-单-双-双-单-双，要特别注意。
热心网友
时间：2023-06-21 20:12
在C3中输入或复制粘贴下列公式
=HYPERLINK("#"&A3&"!A1",A1)
公式中的两个A1，根据需要进行调整为其他单元格。
下拉填充
热心网友
时间：2023-06-21 20:12
1、把光标放在第一个工作表希望插入目录的地方；
2、键入Alt+F11打开VBA编辑器，然后选择菜单“插入 - 模块”；
3、在代码编辑区粘贴如下代码：
Option Explicit
Sub AutoGenerateHyperlinks()
Dim nIndex As Integer
Dim oRange As Range
For nIndex = 2 To Sheets.Count
Set oRange = Cells(Selection.Row + nIndex - 2, Selection.Column)
oRange.Hyperlinks.Add
Anchor:=oRange, Address:="", SubAddress:=Sheets(nIndex).Name &
"!A1", TextToDisplay:=Sheets(nIndex).Name
Next
End Sub
4、键入F5运行，再键入Alt+F11切换回第一个工作表，检查目录超链是否自动建立成功。
