文章目录
自动生成带超链接的目录
提示：以下是本篇文章正文内容，下面案例可供参考
一、知识点
get.workbook宏表函数使用
- 作用：提取工作表信息
- 语法：get.workbook（type_num,name_text）
- 解释：get.workbook（类型编号,打开的工作表名称）
- 注意：参数type_num包含的代码较多，我们主要使用的是1，表示“正文值的水平数组，返回工作簿中所有工作表的名称”。参数name_text如果省略则表示当前活动工作簿。
INDEX()
- 作用：返回表格或区域中的值或值的应用。
- 语法：INDEX(array,row_num,[column_num])。
- 解释：INDEX（数组或区域，行号，列号）。
- 举例 “=INDEX(目录,ROW(A2))”
INDEX引用之前定义的宏函数。ROW(A1)目的是为了INDEX函数的第二个参数随之向下填充而变化，这样我们就能依次提取第1、2、3、4……N个工作表的名称。
FIND()
- 作用：对要查找的文本进行定位，以确定其位置，返回的是位移量。
- 语法：FIND(find_text,within_text,start_num)
- 解释：FIND（要查找的文本，文本所在的单元格，从第几个字符开始查找[可选，省略默认为1，从第一个开始查找]）。
- 举例：“=FIND(“]”,INDEX(目录,ROW(A2))”，“]” 在单元格内的字符串排第六的位置，即得到6。
REPLACE()
- 作用：用新字符串替换旧字符串，而且替换的位置和数量都是指定的。
- 语法：REPLACE(old_text,start_num,num_chars，new_text)
- 解释：REPLACE（要替换的字符串，开始位置，替换个数，新的文本）
- 注意：第四个参数是文本，要加上引号。
- 举例：“=REPLACE(INDEX(目录,ROW(A2)),1,FIND(“]”,INDEX(目录,ROW(A2))),“”)”
INDEX(目录,ROW(A2))是要替换的字符串，1表示从第一个字符串开始，
FIND(“]”,INDEX(目录,ROW(A2))表示替换个数为6，””表示替换为空值，
即从第一个到第六个字符替换为空值。
HYPERLINK()
- 作用：超链接的函数
– ① 打开本地某个文件夹
– ② 打开本地某个文件（任意扩展名）
– ③ 跳转到当前工作表的某个单元格
– ④ 跳转到当前工作薄的/某个工作表/某个单元格
– ⑤ 跳转到其他工作薄的/某个工作表/某个单元格
– ⑥ 跳转到网页
– ⑦ 跳转到名称管理器的引用范围
– ⑧ 跳转到VBA代码
– ⑨ 引用单元格内容，形成动态超链接 - 语法：HYPERLINK（LINK_LOCATION，[FRIENDLY_NAME]）
- 解释：HYPERLINK（链接的地址，显示的标题）
- 举例：
① 打开本地某个文件夹
输入公式：“=HYPERLINK(“C:\Users\xxx\Desktop\早日退休”,“打开文件夹 早日退休”)”
② 打开本地某个文件（任意扩展名）
输入公式：“=HYPERLINK(“F:\机器学习\机器学习实战高清PDF.pdf”,“打开测试文件 pdf”)”
③ 跳转到当前工作表的某个单元格
输入公式：“=HYPERLINK(“#D2”,“转到D2单元格”)”
注意：引用单元格地址的时候，是一定要在单元格地址前面加上“#”的，否则就是“无效引用”
④ 跳转到当前工作薄的/某个工作表/某个单元格
输入公式：“ =HYPERLINK(“#a!D2”,“转到其他sheet名称为a 的D2”)”
⑤ 跳转到其他工作薄的/某个工作表/某个单元格
输入公式：“ =HYPERLINK(“[C:\Users\周晓婷\Desktop\早日退休\模型汇总.xlsx]sheet1!D2”,“其他工作薄的D2”)”
注意：链接其他工作薄的话，就用“[工作薄的完整路径]”。
⑥ 跳转到网页
输入公式：“=HYPERLINK(“https://blog.csdn.net/sodaloveer/article/details/124866941?spm=1001.2014.3001.5502”,“链接到其他网址”)”
⑦ 跳转到名称管理器的引用范围
输入公式：“ =HYPERLINK(“#测试名称”,“名称引用的单元格”)”
⑧ 跳转到VBA代码
输入公式：“ =HYPERLINK(“#测试代码”,“VBA工程”)”
⑨ 引用单元格内容，形成动态超链接
输入公式：“ =HYPERLINK(CONCATENATE(“#”,A3,“!”,A4),A5)”
二、举例
- 目标：目录A列是工作表名称，现在需要将工作表名称提取到A列
第一步：定义名称
1、单击【公式】选项中的【定义名称】
2、弹出【新建名称】的框，在【名称】输入“目录”，在【引用位置】使用宏表函数，输入“=GET.WORKBOOK(1)”。单击【确定】后可以在【名称管理器】中看到刚刚新建的一条记录。
第二步：提取所有工作表名称
1、使用公式：“=INDEX(目录,ROW(A2))”提取出名称为”目录“中的所有工作表的名称。
2、因为现在提取出来的工作表名称是带有工作薄名称的，所以进一步优化，达到只保留工作表名称的效果。在A2单元格输入公式：“=REPLACE(INDEX(目录,ROW(A2)),1,FIND(“]”,INDEX(目录,ROW(A2))),“”)”，下拉后即可提取出不带工作薄的工作表名称。
第三步：批量生成超链接
使用HYPERLINK函数，在B2单元格输入公式：”
=HYPERLINK(“#”&A2&“!A1”,A2) “，往下拉。点击生成超链接的文字，即可跳转到相应工作表下。
第四步：设置”返出目录”超链接
1、点击【A模型】工作表名称，按 “shift” 键选择除了【目录】外的所有工作表，在其中一张工作表的A1中输入公式：”=HYPERLINK(“#目录！A1”,“返回目录”)“，生成返回【目录】工作表的超链接。
