可采用三种方法批量删除word中所有图片:一、用“选择窗格”全选并删除浮动图片;二、用“查找替换”输入^g清除嵌入式图片;三、运行vba宏遍历删除inlineshapes和shapes中的全部图片。

如果您在Word文档中插入了大量图片,但需要快速移除所有图像以简化文档结构或减小文件体积,则可采用以下多种方式实现批量删除。以下是具体操作方法:
一、使用“选择窗格”配合全选删除
Word内置的“选择窗格”可集中显示并管理文档中所有浮动对象(包括图片),便于一次性定位和清除。
1、打开目标Word文档,切换到【开始】选项卡,点击右下角的【选择】按钮,选择【选择窗格】。
2、右侧弹出“选择窗格”,其中列出所有图形对象,包括图片、形状、文本框等;观察名称中含“图片”或“Image”的条目。
3、按住Ctrl键,依次单击窗格中所有图片条目(或拖动鼠标框选全部图片行)。
4、确认全部图片被高亮后,直接按Delete键删除。
二、通过“查找替换”功能定位并清除图片
Word支持使用特殊代码查找嵌入式图片对象,无需逐一手动点击,适合处理内联图片为主的文档。
1、按Ctrl + H打开“查找和替换”对话框。
2、点击【更多】按钮展开高级选项,将光标置于“查找内容”框内,点击【特殊格式】→【图形】。
3、此时“查找内容”中自动填入^g(代表所有图形对象)。
4、保持“替换为”框为空,点击【全部替换】,所有嵌入式图片即被清除。
三、利用VBA宏一键删除全部图片
VBA宏可遍历文档中所有InlineShapes(内联图片)和Shapes(浮动图片),执行无差别清除,适用于混合排版复杂文档。
1、按Alt + F11打开VBA编辑器,依次点击【插入】→【模块】。
2、在新模块窗口中粘贴以下代码:
Sub DeleteAllPictures()
Dim i As Long
For i = ActiveDocument.InlineShapes.Count To 1 Step -1
ActiveDocument.InlineShapes(i).Delete
Next i
For i = ActiveDocument.Shapes.Count To 1 Step -1
ActiveDocument.Shapes(i).Delete
Next i
End Sub
3、关闭编辑器,返回Word,按Alt + F8调出宏列表,选中“DeleteAllPictures”,点击【运行】。










