Excel 批量添加超链接
· ☕ 1 分钟 · ✍️ lizhimiao
批量添加超链接 Sub createHyperLinkForSeletion() ' '将选中单元格创建超链接,链接到单元格内容中名称的表 ' For Each cell In Selection ActiveSheet.Hyperlinks.Add Anchor:=cell, Address:="", SubAddress:= _ "'" & cell.Value & "'!A1", TextToDisplay:=cell.Value Next cell End Sub