Hvordan konverteres alle sammenkædede billeder til indlejret i Word-dokument?

Når du sender et Word-dokument, der indeholder sammenkædede billeder til andre, mangler billederne og vises på modtagerens computer som vist nedenstående skærmbillede. Hvordan konverteres alle sammenkædede billeder til indlejrede på én gang, før de sendes til andre? Denne artikel giver en VBA-metode til at håndtere den.

Konverter sammenkædede billeder til indlejret med VBA-kode

Konverter sammenkædede billeder til indlejret med VBA-kode

Anvend nedenstående VBA-kode for at konvertere alle sammenkædede billeder i et dokument til indlejret.

1. Åbn Word-dokumentet indeholder linkede billeder, du vil konvertere til indlejrede billeder. Tryk på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

2. i Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Modul. Og kopier derefter under VBA-koden til Moduler vindue. Se skærmbillede:

VBA-kode: Konverter alle sammenkædede billeder til indlejrede på én gang

Sub convert_all_inline_shapes()
'Updated by Extendoffice 20180906
    Dim xIShape As InlineShape
    For Each xIShape In ActiveDocument.InlineShapes
        With xIShape
            If .Type = wdInlineShapeLinkedPicture Then
                .LinkFormat.SavePictureWithDocument = True
                .LinkFormat.BreakLink
            End If
        End With
    Next
End Sub

3. Tryk på F5 nøgle for at køre koden.

Derefter konverteres alle sammenkædede billeder i det aktuelle dokument til indlejrede på samme tid.

Bedste kontorproduktivitetsværktøjer

Kutools for Word - Forøg din Word-oplevelse med Over 100 Bemærkelsesværdige funktioner!

🤖 Kutools AI-assistent: Transformer din skrivning med AI - Generer indhold  /  Omskriv tekst  /  Opsummer dokumenter  /  Spørg for information baseret på Dokument, alt sammen i Word

📘 Dokumentbeherskelse: Opdelt sider  /  Flet dokumenter  /  Eksporter udvalg i forskellige formater (PDF/TXT/DOC/HTML...)  /  Batch Konverter til PDF  /  Eksporter sider som billeder  /  Udskriv flere filer på én gang...

✏ Indholdsredigering: Batch Find og erstat på tværs af flere filer  /  Ændr størrelse på alle billeder  /  Transponer tabelrækker og kolonner  /  Konverter tabel til tekst...

🧹 Ubesværet rengøring: Fej væk Ekstra pladser  /  Afsnit bryder  /  Alle overskrifter  /  Tekstbokse  /  Hyperlinks  / For mere fjernelse af værktøjer, gå til vores Fjern gruppe...

➕ Kreative indlæg: Indsæt Tusind adskillere  /  Afkrydsningsfelter  /  Radio knapper  /  QR kode  /  Stregkode  /  Diagonal linjebord  /  Ligningstekst  /  Billede Caption  /  Tabeltekst  /  Flere billeder  / Oplev mere i Indsæt gruppe...

???? Præcisionsvalg: Find ud af specifikke sider  /  tabeller  /  former  /  overskrifter  / Forbedre navigation med mere Vælg funktioner...

⭐ Stjerneforbedringer: Naviger hurtigt til ethvert sted  /  automatisk indsæt gentagende tekst  /  skifte problemfrit mellem dokumentvinduer  /  11 Konverteringsværktøjer...

???? Vil du prøve disse funktioner? Kutools for Word tilbyder en 60-dages gratis prøveperiode, uden begrænsninger! 🚀

Gratis download     Læs mere     Køb Nu