可借助查找替换、选择窗格或vba宏批量清除word中所有图片:一、用^g通配符查找替换删除;二、通过选择窗格多选后删除;三、运行vba宏遍历删除shape与inlineshape对象。

如果您在编辑Word文档时需要快速移除所有嵌入的图片,但手动逐个删除效率低下且容易遗漏,则可以借助内置功能或VBA宏实现批量清除。以下是解决此问题的步骤:
一、使用查找替换功能定位并删除图片
Word的“查找和替换”支持通配符匹配特殊格式内容,图片虽不可直接输入,但可通过查找“图形对象”占位符实现批量选中。该方法无需编程,适用于所有Word版本。
1、按 Ctrl + H 打开“查找和替换”对话框。
2、点击“更多”按钮,勾选“使用通配符”选项。
3、在“查找内容”框中输入 ^g(这是Word中代表图形对象的特殊代码)。
4、“替换为”框保持空白,不输入任何字符。
5、点击“全部替换”,Word将一次性删除文档中所有独立插入的图片(含嵌入式与浮动式)。
二、通过选择窗格批量隐藏后删除
选择窗格可列出文档中所有非文本对象,包括图片、形状和文本框,便于集中识别与操作。此方式适合需预览确认再删除的场景。
1、切换到 “开始”选项卡 → “选择” → “选择窗格”,右侧弹出对象列表。
2、在窗格中查找类型为 “图片” 的条目,其图标通常显示为小缩略图。
3、按住 Ctrl 键 依次单击所有图片名称,实现多选。
4、关闭选择窗格,按键盘 Delete 键彻底清除所选图片。
三、运行VBA宏一键清除全部图像
VBA宏可遍历文档所有内容区域(正文、页眉页脚、文本框、表格单元格),精准识别并删除所有Shape和InlineShape对象,覆盖最全面。
1、按 Alt + F11 打开VBA编辑器。
2、在左侧项目资源管理器中,右键“Normal”或当前文档名,选择 “插入” → “模块”。
3、在新模块窗口中粘贴以下代码:
Sub DeleteAllPictures()
Dim shp As Shape
Dim ils As InlineShape
For Each shp In ActiveDocument.Shapes
shp.Delete
Next shp
For Each ils In ActiveDocument.InlineShapes
ils.Delete
Next ils
End Sub
4、将光标置于代码内任意位置,按 F5 运行宏,文档中所有图片即刻被清除。










