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", "", "返回首页");
}
}
运行效果如下:
WPS函数专家