word2007中批量新增超連結的方法

2022-07-15 14:45:10 字數 1327 閱讀 9512

在word文件如何批量新增超連結。在發一篇長文章,裡面有很多超連結要打,如果乙個乙個的加就會效率很低, 我們可以利用word的巨集vba來實現批量新增超連結。

當我們做好乙個word文件的時候,我們可能希望給每次出現的某個詞(如:同行網)都做上超連結,那麼,我們在word文件中如何批量新增超連結呢?手動乙個乙個的新增是一種方法,但如果文件內容很長時(如幾十頁,幾百頁內容),這種方法明顯很難執行,這種方法不是我們提倡的,我們需要更有效率的方法。

步驟如下:

1、開啟需要編輯的word文件。

2、alt+f11 開啟巨集編輯器。

sub addhyperlink()

'' addhyperlink 巨集

' 批量新增超連結

'selection.find.clearformatting

dim i

for i = 1 to 500

with selection.find

.text = "同行網"

.replacement.text = ""

.forward = true

.wrap = wdfindcontinue

.format = false

.matchcase = false

.matchwholeword = false

.matchbyte = true

.matchwildcards = false

.matchsoundslike = false

.matchallwordforms = false

end with

selection.find.execute

changefileopendirectory _

"c:\documents and settings\jason\my documents\"

activedocument.hyperlinks.add anchor:=selection.range, address:= _

"", subaddress:="", screentip:="", texttodisplay:= _

"同行網", target:="_blank"

next i

end sub

說明:1)將黃底文字「同行網」改成你要新增鏈結的詞。

2)將紅底文字c:\documents and settings\jason\my documents\ 改成你開啟的word文件所在的位置。

3)將藍底文字

換成你要新增的超連結。

4)按f5執行,就可以得到你想要的結果了。

來自:同行網

Word2007中無法顯示Visio物件的解決方法

不知道什麼時候我的word 2007忽然不能顯示visio物件的影象,給工作帶來很 煩。查閱網上的各種方法,主要就是修改internet explorer臨時目錄,不過我試了一下沒有效果。下面是我的解決方法 1.點word 2007左上角的圓圈圖示,彈出選單,選擇word選項 2.選擇 高階 網下拉...

在Word 2007中為公式編號

很多處理公式的人需要為公式編號。在word2007中有幾種方法可供使用,但都不能完全令人滿意。word2007沒有內建的方法來為公式編號。注意題注功能可 參考 功能區,插入題注 自動題注 為舊的 microsoft公式編輯器 的公式進行編號,但其無法用於word2007的新公式。雖然有幾種為公式編號...

在Word 2007中啟用或禁用Office載入項

office載入項是office程式為了完成某種功能而需要在啟動程式時自動載入的模組,例如書法字帖功能 稿紙功能 製作信封功能等。使用者可以根據工作需要啟用或禁用office載入項,以提高office程式的執行效率。在word2007中啟用或禁用office載入項的步驟如下所述 第1步,開啟word...