從Word和Excel中批量提取網(wǎng)址超鏈接

從Word和Excel中批量提取網(wǎng)址超鏈接

　　word和excel批量提取超鏈接的方法相同，都要用到宏功能，因此，在你準(zhǔn)備執(zhí)行這個(gè)功能的時(shí)候，首先要保證你的office軟件是可以加載宏的，一般將宏的安全級(jí)別設(shè)置為中。

　　word和excel批量提取超鏈接的具體步驟是：工具>宏>宏>創(chuàng)建（excel為Visual Basic編輯器），打開(kāi)編輯器，將如下代碼插入模塊：

　　word文檔插入代碼：

　　Sub 超級(jí)鏈接()

　　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

　　將代碼插入后，記住不是替換，打回車然后插入保存。點(diǎn)運(yùn)行即可。word文檔會(huì)將超鏈接的URL顯示在光標(biāo)所在處，excel會(huì)將URL顯示在含超鏈接的單元格的右側(cè)單元格內(nèi)。

【從Word和Excel中批量提取網(wǎng)址超鏈接】相關(guān)文章：

word中怎么設(shè)置超鏈接07-28

如何取消Word文檔中的超鏈接11-19

excel和word的轉(zhuǎn)換方式02-20

如何取消Word文檔中的超鏈接呢09-23

word清除超鏈接10-24

wps中Word怎么去掉自動(dòng)生成的超鏈接09-14

word設(shè)置超鏈接文件10-19

如何在word中插入excel表格文字解說(shuō)02-16

在word中插入隨excel文件更新的表格方法02-19

word文檔超鏈接怎么做09-01