3 raske måter å fjerne hyperkoblinger fra bilder i Word-dokumentet ditt

I denne artikkelen vil vi vise deg 3 raske måter å fjerne hyperkoblinger fra bilder i Word-dokumentet.

Noen ganger, når vi kopierer et bilde på nettet, finner vi det innebygd med en hyperkobling. Og i et Word-dokument kan et uhell klikke på bildet føre deg til nettadressen til bildet. Dette er ikke bare irriterende, men ødelegger også den visuelle effekten av dokumentet ditt, for eksempel nedenfor:

Derfor velger vi å fjerne hyperkoblinger fra bilder for å unngå slike uventede sidehopp. Her går vi.

Metode 1: Fjern hyperkobling fra ett bilde

1. Først, høyreklikk på et bilde.
2. Velg deretter "Fjern hyperkobling" på kontekstmenyen.

Metode 2: Batchfjern hyperkoblinger fra alle bilder i et dokument

Det er en måte å fjerne alle hyperkoblinger fra et dokument. Først trykker du "Ctrl + A" for å velge alt innhold. Deretter trykker du "Ctrl + Shift + F9" for å drepe alle hyperkoblinger. Til din informasjon sletter denne måten alle hyperkoblinger både på bilder og tekster. Likevel er målet vårt å fjerne hyperkoblinger kun fra bilder. Så vi må bruke en makro for å fullføre jobben.

1. Først av alt, trykk "Alt + F11" for å utløse VBA-editoren i Word.
2. Klikk deretter på "Normal" prosjekt i redigeringsprogrammet.
3. Klikk deretter på "Sett inn" på menylinjen.
4. Og velg "Modul" på rullegardinmenyen.
5. Dobbeltklikk nå på modulen for å åpne kodeområdet til høyre og lim inn følgende makro der:

Sub RemoveAllHyperlinksFromPicturesInOneDocument() Dim objInlinePicture As InlineShape Dim objPicture As Shape If ActiveDocument.InlineShapes.Count > 0 Then For Every objInlinePicture In ActiveDocument.InlineShapes objInlinePicture.Hyperlink Selection.Link. Slutt If If ActiveDocument.Shapes.Count > 0 Then For each objPicture In ActiveDocument.Shapes objPicture.Select While Selection.Hyperlinks.Count > 1 Selection.Hyperlinks(0).Delete Wend Next End If End Sub

6. Sist men ikke minst, klikk "Kjør" på menylinjen for å utføre koder.

Metode 3: Batchfjern hyperkoblinger fra bilder i flere dokumenter

1. Før alt, ordne alt tarfå dokumenter i én mappe.
2. Gjenta deretter trinnene i metode 2 for å installere og kjøre følgende 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(mso.FileDialog)-mso.FileDialog eldre = .SelectedItems (1) & "\" Else MsgBox ("Ingen mappe er valgt!") Exit Sub End If End With strFile = Dir(StrFolder & "*.doc*", vbNormal) While strFile <> "" Sett objDoc = Documents. Open(FileName:=StrFolder & strFile) Sett objDoc = ActiveDocument Hvis ActiveDocument.InlineShapes.Count > 1 Deretter For hvert objInlinePicture In ActiveDocument.InlineShapes objInlinePicture.Select While Selection.Hyperlinks.Count > 0 Selection.Hyperlinks(end) End If If ActiveDocument.Shapes.Count > 0 Then For each objPicture In ActiveDocument.Shapes objPicture.Select While Selection.Hyperlinks.Count > 1 Selection.Hyperlinks(0).Slett Wend Next End If objDoc.ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument objDoc.Save strFile = Dir() Wend End Sub

3. I "Bla gjennom"-vinduet som er åpent, velg mappen du anga i trinn 1 og klikk "OK" for å gå videre.

Vær forsiktig med operasjonen din i Word

Word er ikke idiotsikkert, så enhver feil operasjon kan lett utløse kollapsen eller enda verre, resulterende dokumentkorrupsjon. Mens du kan være mer oppmerksom på dine operasjonsferdigheter og -vaner, kan du også kjøpe et verktøy for doc gjenoppretting på forhånd.

Forfatterintroduksjon:

Vera Chen er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert gjenopprette xls og pdf reparere programvareprodukter. For mer informasjon besøk www.datanumen. Med