范文参考网

范文参考网

从Word和Excel中批量提取网址超链接

月度总结 1

【】

  word和excel批量提取超链接的方法相同,都要用到宏功能,因此,在你准备执行这个功能的时候,首先要保证你的office软件是可以加载宏的,一般将宏的安全级别设置为中。

  word和excel批量提取超链接的具体步骤是:工具宏宏创建(excel为Visual Basic编辑器),打开编辑器,将如下代码插入模块:

  word文档插入代码:

  Sub 超级链接()

  For Each aHyperlink In ActiveDocument.Hyperlinks

  With Selection

  .InsertAfter aHyperlink.Name

从Word和Excel中批量提取网址超链接

  .Collapse Direction:=wdCollapseEnd

  .InsertParagraphAfter

  End With

  Next aHyperlink

  End Sub

  excel文档插入代码:

  Sub ExtractHL()

  Dim HL As Hyperlink

  For Each HL In ActiveSheet.Hyperlinks

  HL.Range.Offset(0, 1).Value = HL.Address

  Next

  End Sub

  将代码插入后,记住不是替换,打回车然后插入保存。点运行即可。word文档会将超链接的URL显示在光标所在处,excel会将URL显示在含超链接的单元格的右侧单元格内。

https://www.fezixz.cn