当前位置: 主页 > Office办公 > Excel专区 > Excel教程 > Excel2003教程 > 如何快速提取excel超链接文本下的链接

如何快速提取excel超链接文本下的链接

  • 2022-10-02
  • 来源/作者: Wps Office教程网/ 菜鸟图库
  • 124 次浏览

这是自己今天工作上遇到的事情,如何把大致A列这样的变成B列这样

,自己百度了会,终于找到一段给力的代码。在Excel中插入VBA代码是这样的,按alt+F11,进入VBE编辑器,点插入模块,输入代码

Sub 提取链接()

Dim HL As Hyperlink

For Each HL In ActiveSheet.Hyperlinks

HL.Range.Offset(0, 1).Value = HL.Address‘就是说把链接放在非单独链接的后面一列。

Next

End Sub

按F5或运行,就OK了。很实用的。