WPS的JS宏如何批量实现文字的超链接

表格中需要对文字进行超链接,每个链接指引到不同的地址。例如:

实现如下表格中,文件名称超级链接到对应的文件路径上,点击对应的文件名称,即可打开对应的文件。

|----|--------------|------------------------|
| 序号 | 文件名称 | 文件路径 |
| 1 | 变更申请与处理表.xls | 文档\系统配置\变更申请与处理表.xls |
| 2 | 配置审计报告.xls | 文档\系统配置\配置审计报告.xls |
| 3 | 配置权限表.xlsx | 文档\系统配置\配置权限表.xlsx |
| 4 | 配置管理总结报告.xls | 文档\系统配置\配置管理总结报告.xls |
| 5 | 配置管理计划.doc | 文档\系统配置\配置管理计划.doc |
| 6 | 配置项状态报告.xls | 文档\系统配置\配置项状态报告.xls |

把上述表格放入Excel表中,序号对应A列,文件名称对应B列,文件路径对应C列;

JS宏对应代码编写如下:

复制代码
	for(i=2;i<=7;i++)
	{//文本的超链接设置
		Range("B"+ i).Select();
		Selection.Hyperlinks.Add(Selection, Range("C"+i).Formula, "", "", Range("B"+ i).Formula);
	}

执行之后,即可实现如下效果:

上述表中为每一条文件名称完成了相应文件路径的超级链接,点击相关的文件名称之后,即可打开对应的文件,不需要为每一条记录进行单独的指定超级链接。

扩展,下面对话框的中功能,对应的代码实现为:

复制代码
//配置管理计划.doc文本 超链接到文件地址"文档\\系统配置\\配置管理计划.doc"
	Selection.Hyperlinks.Add(Selection, "文档\\系统配置\\配置管理计划.doc", "", "", "配置管理计划.doc");
	//本文档中的位置:配置管理计划.doc链接到本文档的Sheet1!A1
	Selection.Hyperlinks.Add(Selection, "", "Sheet1!A1", "", "配置管理计划.doc");
	//配置管理计划.doc 超链接到电子邮件地址,点击后自动打开电子邮件客户端(eg:foxmail),并设置好邮件地址support@163.com,以及邮件标题
	Selection.Hyperlinks.Add(Selection, "mailto:support@163.com?subject=关于配置管理计划", "", "", "配置管理计划.doc");
相关推荐
transuperb5 天前
WPS-word画出完美的三线表
word·写作·wps
扬帆破浪5 天前
开源免费的WPS AI 软件 察元AI文档助手:链路 053:AIAssistantDialog 选区翻译的 streamChatCompletion
开源·wps
抹茶咖啡6 天前
IT运维的365天--045 WPS突然就不能正常打开Excel文件了
excel·it运维·wps
2501_907136826 天前
发票批量打印工具,仿写WPS发票打印工具
软件需求·wps
扬帆破浪7 天前
开源免费的WPS AI 软件 察元AI文档助手:链路 044:脱密对话链路中的 chatCompletion 与 response_format 回退
开源·wps
扬帆破浪7 天前
开源免费的WPS AI 软件 察元AI文档助手:链路 051:assistantPromptRecommendationService 推荐配置
开源·wps
TTGGGFF8 天前
解锁 AI 办公:配置 AI 操控 WPS 全攻略
wps
Non-existent9878 天前
TableGIS的WPS扩展项插件-通信网优规划相关地理空间数据处理
数据分析·excel·wps
w20180010 天前
小黑课堂计算机一级与二级wps office题库软件下载安装教程
wps
PythonFun10 天前
告别加班!3分钟搞定百余份荣誉证书,WPS这个组合功能太强了
大数据·wps