Word技巧：如何一次性删除所有图片

为什么需要一次性删除所有图片？

在处理长篇文档时，有时需要只保留文字内容，剔除所有图片。例如，从网页复制的内容、PDF转换的文档或包含许多插图的报告。手动删除每一张图片不仅效率低下，还容易遗漏。本文将介绍三种快速、彻底删除Word文档中所有图片的方法。

方法一：使用“查找和替换”功能

此方法适用于Word 2010及以上版本，无需额外代码，最直接。

1. 打开文档，按 Ctrl + H 打开“查找和替换”对话框。
2. 在“查找内容”框中，点击“更多”>>“特殊”，选择“图形”（或直接输入 ^g）。注意：^g 代表所有图形对象，包括图片、形状等。
3. 保持“替换为”框为空，点击“全部替换”。
4. 系统会提示删除数量，点击“是”确认。

注意：该方法会删除所有嵌入型图片，但可能无法删除浮动型图片（如设置为“四周型”或“紧密型”的图片）。如果文档中有浮动图片，请结合方法二或三。

方法二：使用VBA宏批量删除

VBA宏可以处理所有类型的图片，包括浮动图片。

1. 按 Alt + F11 打开VBA编辑器。
2. 点击“插入”->“模块”，粘贴以下代码：

   Sub DeleteAllPictures()
       Dim shp As Shape
       For Each shp In ActiveDocument.Shapes
           shp.Delete
       Next shp
       
       Dim i As InlineShape
       For Each i In ActiveDocument.InlineShapes
           If i.Type = wdInlineShapePicture Then
               i.Delete
           End If
       Next i
   End Sub

3. 关闭VBA编辑器，回到Word文档。
4. 按 Alt + F8 打开宏对话框，选择“DeleteAllPictures”，点击“运行”。

此宏会删除所有形状（包括图片、形状、文本框）和嵌入式图片。如果只想删除图片，可以修改代码判断条件。

方法三：通过选择窗格批量删除

该方法适合少量浮动图片，但操作简单，无需编程。

1. 点击“开始”->“选择”->“选择窗格”，打开右侧的“选择和可见性”窗格。
2. 按住 Ctrl 键，在窗格中逐一选中所有图片对象（名称通常为“图片 1”等）。
3. 按 Delete 键删除。

缺点：如果图片数量很多，逐个选择仍然繁琐，且嵌入式图片不会显示在窗格中。

总结

对于大多数用户，方法一（查找替换）最简单快捷，但可能漏掉浮动图片。方法二（VBA宏）最为彻底，可一次清除所有图片和形状。方法三（选择窗格）适合少量手动操作。根据您的文档类型和图片嵌入方式，选择最适合的方法。建议在操作前备份文档，以防误删。