WPS宏批量生成工作表超链接,并在每个工作表中添加“返回首页”按钮

懒人办公
懒人办公

创作者俱乐部成员

以下工作簿中有很多个工作表,我们需要在首页批量获取所有工作表名称,生成每个工作表的超链接,并且在每个工作表的A1单元格添加一个名为“返回首页”的按钮。

代码如下:

function 批量获取工作表名称并创建超链接(){

let hh=Sheets.Item('首页');

for(i=2;i<=Sheets.Count;i++){

let sh=Sheets.Item(i);

nm=sh.Name;

hh.Hyperlinks.Add(hh.Cells.Item(i,1), "", "'"+nm+"'!A1", "", nm);

sh.Hyperlinks.Add(sh.Range('a1'), "", "'首页'!A1", "", "返回首页");

}

}

运行效果如下:

贵州省
浏览 3612
2
18
分享
18 +1
8
2 +1
全部评论 8
 
徐作林
谢谢大佬!
· 湖北省
回复
 
CC
这下知道智能工具箱的目录是怎么搞得了
· 湖北省
回复
 
Q??㊣
受教了!向大佬学习!
· 山东省
回复
 
末世~晶
受教了!大神!
· 陕西省
回复
 
思雨
大佬,就是大佬,厉害了
· 河南省
回复
 
小姐姐
学习的第一天
· 广东省
回复
 
薄旺龙
老师专业,受益匪浅
· 新疆
回复
 
张俊
张俊

WPS函数专家

大佬是JS宏大咖,向大佬学习,每天学习大佬的一个JS宏!
· 上海
回复