3 rýchle spôsoby odstránenia hypertextových odkazov z obrázkov v dokumente Word

V tomto článku by sme vám chceli predstaviť 3 rýchle spôsoby, ako odstrániť hypertextové odkazy z obrázkov vo vašom dokumente Word.

Niekedy pri online kopírovaní obrázka zistíme, že je vložený s hypertextovým odkazom. A v dokumente Word vás môže neúmyselné kliknutie na obrázok priviesť na čistú adresu obrázka. To je nielen dráždivé, ale narúša to aj vizuálny efekt dokumentu, napríklad nižšie:

Preto sme sa rozhodli odstrániť hypertextové odkazy z obrázkov, aby sme sa vyhli takémuto neočakávanému skoku stránky. Ideme na to.

Metóda 1: Odstránenie hypertextového odkazu z jedného obrázka

1. Najskôr kliknite pravým tlačidlom myši na obrázok.
2. Potom v kontextovej ponuke zvoľte možnosť „Odstrániť hypertextový odkaz“.

Metóda 2: Dávkové odstránenie hypertextových odkazov zo všetkých obrázkov v dokumente

Existuje spôsob, ako z dokumentu odstrániť všetky hypertextové odkazy. Najprv stlačte „Ctrl + A“ a vyberte celý obsah. Potom stlačte „Ctrl + Shift + F9“, aby ste zabili všetky hypertextové odkazy. Pre vašu informáciu, tento spôsob vymaže všetky hypertextové odkazy na obrázkoch aj textoch. Naším cieľom je odstrániť hypertextové odkazy iba z obrázkov. Na dokončenie úlohy teda budeme musieť použiť makro.

1. Najskôr stlačte „Alt + F11“, čím spustíte editor VBA v programe Word.
2. Potom v editore kliknite na projekt „Normálny“.
3. Ďalej na paneli s ponukami kliknite na „Vložiť“.
4. V rozbaľovacej ponuke zvoľte možnosť „Modul“.
5. Teraz dvakrát kliknite na modul, aby ste otvorili jeho oblasť kódovania vpravo a tam vložili nasledujúce makro:

Sub RemoveAllHyperlinksFromPicturesInOneDocument () Dim objInlinePicture As InlineShape Dim objPicture As Shape If ActiveDocument.InlineShapes.Count> 0 Then For each objInlinePicture In ActiveDocument.InlineShapes objInlinePicture.Select While Selection.Hyperlinks.Count> 0 Ak Ak ActiveDocument.Shapes.Count> 1 Potom Pre každý objPicture V ActiveDocument.Shapes objPicture.Select While Selection.Hyperlinks.Count> 0 Selection.Hyperlinks (0). Odstrániť Wend Ďalej Koniec Ak Koniec Sub

6. V neposlednom rade spustite kódy kliknutím na tlačidlo „Spustiť“ na paneli s ponukami.

Metóda 3: Dávkové odstránenie hypertextových odkazov z obrázkov vo viacerých dokumentoch

1. Pred všetkým zariadiť všetko tarzískať dokumenty v jednom priečinku.
2. Potom zopakujte kroky v metóde 2, aby ste nainštalovali a spustili nasledujúce makro:

Sub RemoveAllHyperlinksFromPicturesInMultipleDocuments () Dim objInlinePicture As InlineShape Dim objPicture As Shape Dim StrFolder As String Dim strFile As String Dim objDoc As Document Dim dlgFile As FileDialog Set dlgFile = Application.FileDialog (msoFileDialog) msoFileDialogFr = (1) & "\" Else MsgBox ("Nie je vybraný žiadny priečinok!") Ukončiť Podkoniec, ak Koniec s strFile = Dir (StrFolder & "* .doc *", vbNormal) Zatiaľ čo strFile <> "" Nastaviť objDoc = Dokumenty. Open (FileName: = StrFolder & strFile) Set objDoc = ActiveDocument If ActiveDocument.InlineShapes.Count> 1 Then For Every objInlinePicture In ActiveDocument.InlineShapes objInlinePicture. Vyberte While Selection.Hyperlinks.Count> 0 Selection.Hyperlinks (0). Odstrániť Wend Ďalej End If If ActiveDocument.Shapes.Count> 1 Then For each objPicture In ActiveDocument.Shapes objPicture.Select While Selection.Hyperlinks.Count> 0 Selection.Hyperlinks (0) .Delete Wend Next End If objDoc.ActiveWindow.ActivePane.View.See kView = wdSeekMainDocument objDoc.Save strFile = Dir () Wend End Sub

3. V otvorenom okne „Prechádzať“ vyberte priečinok, ktorý ste nastavili v kroku 1, a pokračujte kliknutím na tlačidlo „OK“.

Buďte opatrní pri svojej práci v programe Word

Word nie je spoľahlivý, takže akákoľvek nesprávna operácia môže ľahko spustiť kolaps alebo ešte horšie výsledné poškodenie dokumentu. Aj keď môžete venovať viac pozornosti svojim operačným schopnostiam a návykom, môžete si tiež kúpiť nástroj pre obnova dokumentu vopred.

Úvod autora:

Vera Chen je expertka na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane zotaviť xls a pdf oprava softvérových produktov. Pre viac informácií navštívte www.datanumen. S