如何將 Word 文件中的所有連結圖片轉為內嵌圖片？

當您將包含連結圖片的 Word 文件傳送給他人時，這些圖片可能會遺失，並在收件人的電腦上顯示如截圖所示。如何在傳送前一次性將所有連結圖片轉為內嵌圖片？本文提供一個 VBA 方法，輕鬆解決此問題。

使用 VBA 程式碼將連結圖片轉換為內嵌圖片

---

使用 VBA 程式碼將連結圖片轉換為內嵌圖片

請套用以下 VBA 程式碼，將文件中所有連結的圖片轉為內嵌圖片。

1. 開啟包含您要轉換為內嵌圖片之連結圖片的 Word 文件，按下 Alt+F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 在 Microsoft Visual Basic for Applications 視窗中，按一下插入 > 模組。然後將下方的 VBA 程式碼複製到模組視窗中。請參閱截圖：

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 鍵，立即執行程式碼！

接著，目前文件中的所有連結圖片將一併轉換為內嵌圖片。