Excel快速删除所有图片技巧

可快速清除Excel中所有图片：一、用Ctrl+G→定位条件→选“对象”后Delete；二、通过“选择窗格”识别并多选删除图片；三、运行VBA宏DeleteAllPictures一键清除。

如果您在Excel工作表中插入了大量图片，但需要快速清除所有图片元素，可以利用Excel内置的对象定位与批量操作功能实现高效删除。以下是具体的操作步骤：

一、使用“定位条件”功能批量选中并删除图片

Excel的“定位条件”支持识别工作表中的所有图形对象（包括图片、形状、图表等），通过该功能可一次性选中全部图片，再统一删除。

1、按 Ctrl + G 打开“定位”对话框。

2、点击右下角的 “定位条件” 按钮。

3、在弹出窗口中选择 “对象” 选项，点击“确定”。

4、此时工作表中所有图片及图形对象将被同时选中。

5、直接按键盘上的 Delete 键即可全部删除。

二、通过“选择窗格”逐一隐藏或删除指定图片

当工作表中存在多种对象且需区分处理时，“选择窗格”可显示全部对象名称与层级关系，便于识别和管理图片元素。

1、切换到 “开始”选项卡，在“编辑”组中点击 “查找和选择” 下拉菜单。

2、选择 “选择窗格”，右侧将打开对象列表面板。

3、在窗格中查找名称含 “图片” 或图标为图像缩略图的条目。

4、按住 Shift 键并依次单击多个图片条目以多选。

5、点击窗格底部的 “删除”图标（垃圾桶） 或直接按 Delete 键执行删除。

三、使用VBA宏一键清除所有图片

对于频繁处理多张工作表或大批量文件的用户，VBA宏可跳过手动交互，自动遍历并清除所有嵌入式图片对象。

1、按 Alt + F11 打开VBA编辑器。

2、在左侧项目资源管理器中，右键当前工作簿名称，选择 “插入” → “模块”。

3、在新模块空白窗口中粘贴以下代码：

Sub DeleteAllPictures()

Dim shp As Shape

For Each shp In ActiveSheet.Shapes

If shp.Type = msoPicture Then shp.Delete

Next shp

End Sub

4、关闭VBA编辑器，返回Excel界面，按 Alt + F8 调出宏对话框。

5、选中 “DeleteAllPictures”，点击“运行”按钮。