如何将所有链接的图像转换为嵌入在Word文档中?
当您发送Word文档包含与他人的链接图像时,这些图像将丢失并显示在收件人的计算机中,如下面的屏幕快照所示。 在发送给其他人之前,如何一次将所有链接的图像转换为嵌入的图像? 本文提供了一种VBA方法来处理它。
使用VBA代码将链接的图像转换为嵌入式图像
请应用下面的VBA代码将文档中的所有链接图像转换为嵌入式图像。
1.打开Word文档,其中包含将转换为嵌入式图像的链接图像。 按 其他 + F11 键打开 Microsoft Visual Basic应用程序 窗口。
2。 在里面 Microsoft Visual Basic应用程序 窗口中,单击 插页 > 模块。 然后将下面的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 键来运行代码。
然后,将当前文档中的所有链接图像同时转换为嵌入的图像。
推荐的Word生产力工具
Kutools For Word-超过100种Word高级功能,节省50%的时间
- 复杂和重复的操作可以在几秒钟内完成一次处理。
- 跨文件夹一次将多个图像插入Word文档。
- 将文件夹中的多个Word文件合并并合并为所需顺序。
- 根据标题,分节符或其他条件将当前文档拆分为单独的文档。
- 在Doc和Docx之间,Docx和PDF之间转换文件,用于常见转换和选择的工具集合等...