如何快速删除Excel中的所有自动形状？

如何快速删除Excel中的所有自动形状？

如果要摆脱Excel中的自动形状，则可能需要一种简单的方法来快速删除所有形状，而不是一个一个地删除自动形状。 以下棘手的方法将帮助您一键删除所有自动形状。

使用Excel中的转到功能删除活动工作表中的所有自选图形 使用VBA删除活动工作表中的所有自选图形 删除工作表或工作簿中的所有自选图形 Kutools for Excel 使用Excel中的转到功能删除活动工作表中的所有自选图形

如果只有一种对象（工作表中的自动形状），则可以使用以下命令删除所有自动形状 转到 功能。

1。 点击 F5 or 按Ctrl + G 显示 转到 对话框并单击 特别..，请参见屏幕截图：

2。 检查 对象，然后单击 Ok，它将选择所有对象，请参见屏幕截图：

3。 然后点击 Backspace键 按钮删除所有自选图形。

备注：对象包含自动形状，图片，剪贴画等。 如果在工作表中不仅存在自动调整形状对象，则应用此方法将删除自动调整形状以外的其他对象。

使用VBA删除活动工作表中的所有自选图形

使用VBA宏可以帮助您快速删除活动工作表中的所有自动形状。

步骤1：按住 ALT + F11 键，然后打开 Microsoft Visual Basic应用程序 窗口。

步骤2：点击 插页 > 模块，然后将以下宏粘贴到 模块 窗口。

VBA：删除活动工作表中的所有形状。

子DeleteShapes（）形状变暗对于ActiveSheet.Shapes中的每个Shp删除下一个shpEND SUB

步骤3：按下 F5 运行此宏的键。

然后，您将看到活动工作表中的所有形状都被快速删除。

:

1.此VBA宏只能删除活动工作表中的所有形状。

2.此VBA宏可以删除活动工作表中的各种形状，包括图片，剪贴画，形状，SmartArt，图表，文本框等。

删除工作表或工作簿中的所有自选图形 Kutools for Excel

如果您只想从工作表中删除自动形状， Kutools for Excels 删除插图和对象 可以帮助您一键删除活动工作表，选定工作表或整个工作簿中的特定形状。

Kutools for Excel 包括300多个便捷的Excel工具。 30天免费试用，不受限制。 立即获取.

步骤1：点击 Kutools > 删除插图和对象.

步骤2： 删除工具 对话框，请检查 汽车形状 选项，然后在中检查选项之一 在看 部分。 请参见以下屏幕截图：

如果您检查 活动表 选项，它将删除活动工作表中的所有自动形状； 如果您检查 选定的工作表 选项，它将删除所选工作表中的所有自动形状； 如果您检查 所有工作表 选项，它将删除整个工作簿中的所有自动形状。

步骤3：点击 OK，它将删除所有自动形状。

Kutools for Excels 删除工具 可以帮助我们删除所有 图表，折线，图片，自动形状，智能艺术，文本框，链接的OLE对象 和 嵌入式OLE对象 在活动工作表，选定工作表或当前工作簿的所有工作表中。 点击了解更多…

相关文章： 轻松删除所有图片 删除所有图表工作簿 快速删除所有文本框