Excel表格怎么一键删除所有图片?超简单方法!

方法一:使用“定位条件”功能(适合Excel 2010及以上版本)

  1. 选中需要删除图片的整个工作表区域(按 Ctrl + A 全选)。
  2. 按 F5 键或 Ctrl + G 打开“定位”对话框。
  3. 点击左下角的“定位条件”按钮。
  4. 在弹出的对话框中选择“对象”,然后点击“确定”。
  5. 此时所有图片(包括形状、图表等对象)会被选中,按 Delete 键即可全部删除。

方法二:使用VBA宏代码(适合所有版本,可一键执行)

  1. 按 Alt + F11 打开VBA编辑器。
  2. 在菜单栏点击“插入” -> “模块”。
  3. 将以下代码复制粘贴到模块中:
    Sub DeleteAllPictures()
        Dim pic As Shape
        For Each pic In ActiveSheet.Shapes
            If pic.Type = msoPicture Then
                pic.Delete
            End If
        Next pic
    End Sub
  4. 关闭VBA编辑器,按 Alt + F8 打开宏对话框,选择“DeleteAllPictures”并点击“运行”。

注意:VBA方法仅删除图片(Picture),不删除文本框、图表等其他对象。如需删除所有对象,可将代码中的 If pic.Type = msoPicture Then 改为 pic.Delete。

小贴士

如果只想删除工作表中部分区域的图片,可以先框选指定区域,再执行“定位条件”或VBA代码(需修改代码为选中区域内的形状)。另外,操作前建议备份文件,以防误删。

现在,您再也不用逐个手动删除Excel中的图片了!