|
超鏈接刪除,，但不刪除其內(nèi)容：1.全選。2.ctrl+shift+F9,。 超鏈接刪除：1.全選,。2. alt+F9。3.編輯菜單,，替換,，高級(jí)，特殊字符,，查找內(nèi)容中選擇域,。替換中什么都不選。（其它域可能也被刪除） VBA的方法： Sub HyperlinksDel() Dim i% Application.ScreenUpdating = False With ThisDocument.Hyperlinks For i = .Count To 1 Step -1 .Item(i).Delete Next End With Application.ScreenUpdating = True End Sub 或 者： 此代碼僅去掉超鏈接域,，而不會(huì)刪除其它的域： Sub UnFieldHyperlink() Dim a As Field For Each a In ActiveDocument.Fields If a.Type = wdFieldHyperlink Then a.Unlink End If Next End Sub 批量添加： 在編輯word文檔時(shí),，如果需要添加很多超鏈接，這時(shí)把一個(gè)一個(gè)超鏈接手動(dòng)添加上去,，會(huì)耗費(fèi)你很多時(shí)間 和精力,，下面我們就一起來(lái)學(xué)習(xí)一種 簡(jiǎn)便的方法，在word中批量添加超鏈接,。 首先,，把你需要添加超鏈接的一個(gè)地方加上你需要的超鏈接，然后把該word文檔另存為html 文件,，用文本 編輯器打開這個(gè)html文件,，通過查找與替換的方法，將需要添加超級(jí)鏈接的地方批量替換后保存,，再用ie 瀏 覽器打開保存后的html文件,，把打開后的文章復(fù)制到word里即可。 如何在excel中批量添加超鏈接 方 法一： 如果你的內(nèi)容在A列,，那么B1如果公式: =hyperlink(A1) 向下填充公式就行了 當(dāng) 然,你的內(nèi)容應(yīng)該是"http://.....html" 如果不是,那么公式這么寫: =hyperlink("http://"&A1) 方 法二： 可以在Excel中添加一個(gè)宏來(lái)完成,，代碼如下 Sub 宏1() Dim i As Integer For i = 1 To 5 ActiveSheet.Range("C" & i).Select ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= "Sheet1!C6" Next End Sub 方法三： 首先在第一張工作表(Sheet1)中做好目錄!然后,再到第二張(Sheet2)中做好第一 張表格,最后依次類推做 好N張工作表中的表格。 再次,，光稱移到第一張工作表中的文字中或者任意位置（比果你要連接到第二張工作 表中）,，單擊插入菜 單中的‘插入超級(jí)鏈接’的按鈕，出現(xiàn)一個(gè)對(duì)話框,，單擊左邊對(duì)話框的‘本文檔中的位置’然后再選擇右 邊 窗口中的第二張工作表（如Sheet2）,，再按確定,。 其次，光標(biāo)移到第二張工作表中的文字或者任意位置（你現(xiàn)在的操作的第二張工作表超鏈接到第 一張,，就 是目錄處）,，打開插入菜單中的‘插入超級(jí)鏈接 ’，出現(xiàn)對(duì)話框后再單擊左邊方框中的‘本文檔中的位 置’,，再到右 邊窗格中選擇（單擊）第一張工作表（如Sheet1）,，再次按確定。 好,，這樣就做成了在EXCEL表格中的相互的超鏈接,。 |
|
|
來(lái)自： 超越夢(mèng)想之上 > 《電腦知識(shí)》
