微小宝编辑器修改html代码,怎么在微小宝编辑器提取永久链接

满意答案

mailman64

2018.09.04

采纳率：49%    等级：7

已帮助：559人

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

word文档插入代码：

Sub 超级链接()

For Each aHyperlink In ActiveDocument.Hyperlinks

With Selection

.InsertAfter aHyperlink.Name

.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显示在含超链接的单元格的右侧单元格内。

03分享举报