如何將Word文檔中的所有連結圖片轉換為嵌入式圖片？

Author: Siluvia Last Modified: 2025-05-12

當您將包含連結圖片的Word文檔發送給其他人時，圖片可能會遺失，並在接收者的電腦上顯示如下方截圖所示。如何在發送之前一次性將所有連結圖片轉換為嵌入式圖片呢？本文提供了一種使用VBA方法來處理此問題的方式。

Linked image that cannot be displayed

使用VBA代碼將連結圖片轉換為嵌入式圖片

使用VBA代碼將連結圖片轉換為嵌入式圖片

請應用以下VBA代碼，將文檔中的所有連結圖片轉換為嵌入式圖片。

1. 打開包含要轉換為嵌入式圖片的Word文檔。按下 Alt + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

2. 在 Microsoft Visual Basic for Applications 窗口中，點擊插入 > 模組。然後將以下VBA代碼複製到模組窗口中。參見截圖：

VBA window with a module inserted

VBA代碼：一次性將所有連結圖片轉換為嵌入式圖片

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. 按下 F5 鍵運行代碼。

然後當前文檔中的所有連結圖片會同時被轉換為嵌入式圖片。