KutoolsforOffice — 一套方案，五大工具。事半功倍。

如何删除 Excel 中的所有按钮或命令按钮？

作者Siluvia修改日期

在某些 Excel 工作表中，您可能已添加了多个按钮（例如窗体控件按钮或 ActiveX 命令按钮），用于执行不同任务或实现流程自动化。随着工作表设计的调整、模板的清理，或为共享文件做准备，您可能需要批量删除这些按钮。当按钮散布在工作表各处时，手动逐一删除不仅费时，还容易遗漏。本文为您介绍几种高效实用的方法，助您快速清除当前工作表中的所有窗体控件按钮或命令按钮，轻松整理工作簿，避免其他用户因误操作而产生混淆或不必要的交互。

使用“定位条件”删除所有按钮
通过全选一次性删除所有按钮（包括窗体控件按钮和命令按钮）
通过 VBA 代码删除所有按钮（包括窗体控件按钮和命令按钮）
使用 VBA 代码仅删除窗体控件按钮或命令按钮

使用“定位条件”删除所有按钮

删除按钮（尤其是窗体控件按钮）最简便实用的方法是使用 Excel 中的定位条件功能。此方法无需 VBA 脚本，适合希望避免编写代码，却又需要比手动选择更强控制力的用户。该方法对窗体控件效果最佳，但无法删除 ActiveX 控件。

1. 在活动工作表中选择任意单元格，然后按 F5 键打开定位对话框，再单击定位条件。

2. 在下一个对话框中，选择对象，然后单击确定，即可立即选中工作表中的所有图形对象（包括窗体控件按钮）。

3. 按下 Delete 键，即可删除所有选中的按钮和对象。

提示：此方法会选中所有对象（包括形状、文本框和图片），而不仅仅是窗体控件。如果工作表中包含其他重要对象，请在按下 Delete 键前仔细检查。若同时存在窗体控件按钮和 ActiveX 控件，此方法仅能删除前者；如需删除 ActiveX 控件，请使用 VBA。

通过全选一次性删除所有按钮（包括窗体控件按钮和命令按钮）

一种直接的方法是从活动工作表中全选所有按钮（包括窗体控件和命令按钮）并一次性删除。此方法适合偏好直观操作或需要快速清除工作表中所有交互式对象的用户，无需任何编码知识或特殊设置，是执行简单清理任务、一次性移除所有控件的理想选择。

使用此方法时请注意，它将选中并可能删除工作表中的所有对象（包括形状、图表、图片及其他控件）。如需保留某些非按钮对象，请务必谨慎操作。

1. 单击功能区上的开发工具> 设计模式 以启用设计模式。此步骤可确保同时选中并管理窗体控件按钮和 ActiveX 控件。如果未看到“开发工具”选项卡，需在文件> 选项> 自定义功能区 中启用。

Excel 截图，展示如何在“开发工具”选项卡中启用设计模式

2. 单击工作表中的任意按钮（窗体控件或命令按钮）以选中它，然后按住 Ctrl 键并按下 A 键（即 ）Ctrl + A），即可选中活动工作表中的所有按钮及其他对象。

使用 Ctrl + A 全选 Excel 中所有按钮的截图

3. 选中所有项目后，按下 Delete 键，即可立即从工作表中删除所有选中的按钮及其他对象。

注意：此方法会同时选中并删除工作表中的形状、图片、图表等所有对象。删除前请仔细检查所选内容，避免误删需要保留的对象。如果只想删除特定按钮而非全部对象，请使用下文所述的 VBA 方法。

通过 VBA 代码删除所有按钮（包括窗体控件按钮和命令按钮）

如果您希望采用更快、更精准的解决方案，避免误删非目标对象，可通过 VBA 代码以编程方式删除活动工作表中的所有按钮。此方法特别适用于包含大量按钮的工作簿，能最大限度减少手动操作，同时有效防止意外删除其他形状，并确保多个工作表间的一致性。但需具备基本的 VBA 知识，并能访问开发工具。

1. 打开包含待删除按钮的工作表，按下 Alt + F11 键，即可启动 Microsoft Visual Basic for Applications（VBA）编辑器。

2. 在 Microsoft Visual Basic for Applications 窗口中，单击插入> 模块，然后将以下 VBA 代码复制并粘贴到模块窗口中。

VBA 代码：从当前工作表中删除所有按钮

Sub Clear_ButtonsActiveSheet()
    Dim I As Long
    Dim xOLE As Object
    On Error Resume Next
    ActiveSheet.Buttons.Delete
    For Each xOLE In ActiveSheet.OLEObjects
        If TypeName(xOLE.Object) = "CommandButton" Then
            xOLE.Delete
        End If
    Next
End Sub

3. 按 F5 键或单击运行按钮即可执行代码，当前活动工作表中的所有类型按钮（包括窗体控件和命令按钮）将立即被删除。

提示：运行代码前，建议先保存工作簿，以防意外丢失数据。此 VBA 脚本最适合需要清除工作表中所有按钮的场景；若仅需删除特定类型的按钮，请参考下文的替代 VBA 方法。如果工作表处于保护状态，可能需先取消保护，才能允许代码删除对象。代码运行后，请立即检查工作表，确保仅删除了预期的控件。

使用 VBA 代码仅删除窗体控件按钮或命令按钮

在某些情况下，您可能只需删除特定类型的按钮（仅窗体控件按钮或仅 ActiveX 命令按钮），同时保留另一种类型。这有助于精准微调工作表功能，而不影响其他无关对象。以下是针对每种场景的独立 VBA 解决方案，助您更精确地控制要删除的按钮类型。

1. 打开包含待选择性删除按钮的工作表，然后按 Alt + F11 键，即可打开 Microsoft Visual Basic for Applications 窗口。

2. 在 VBA 编辑器中，单击插入> 模块 以创建新模块，然后根据要删除的按钮类型，复制并粘贴以下任一 VBA 代码。

VBA 代码：从当前工作表中删除所有窗体控件按钮

Sub Clear_ButtonsActiveSheet()
    ActiveSheet.Buttons.Delete
End Sub

VBA 代码：从当前工作表中删除所有命令按钮

Sub Clear_ButtonsActiveSheet()
    Dim xOLE As Object
    On Error Resume Next
    For Each xOLE In ActiveSheet.OLEObjects
        If TypeName(xOLE.Object) = "CommandButton" Then
            xOLE.Delete
        End If
    Next
End Sub

3. 粘贴相应的 VBA 代码后，按 F5 键或单击运行按钮即可执行。根据所用脚本，您的工作表将立即删除所有窗体控件按钮或所有 ActiveX 命令按钮。

使用这些代码时，请务必运行符合您实际需求的正确脚本。每个脚本每次仅针对一种按钮类型。如果您的工作表中同时包含两种类型的按钮，并希望全部删除，请依次运行两个脚本。代码执行后，请仔细检查工作表布局，确保仅目标控件被删除——尤其是在工作表中还包含其他形状或嵌入对象的情况下。运行 VBA 前，请务必备份工作簿，以防意外丢失无关内容。

总之，Excel 提供了多种删除按钮的方法——既可手动操作，也可使用定位条件，或借助 VBA 脚本——您可以根据实际情况选择最合适的方式。若遇到某些按钮无法删除的问题，请确认工作表未被保护，或检查这些控件是否属于组合对象的一部分。对于批量删除，或需频繁从多个工作表中移除控件的情况，使用 VBA 脚本能显著提升效率、节省时间。执行批量删除前，请务必备份工作簿，以便必要时快速恢复重要内容。

相关文章：

最佳办公效率工具

🤖KUTOOLS AI 助手：基于以下内容革新数据分析：智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能：查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP：多条件 VLookup  |  多值 VLookup  |   跨多工作表 VLookup   |   模糊查找……
高级下拉列表：快速创建下拉列表   |  级联下拉列表   |  多选下拉列表……
列管理器：添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列……
特色功能：网格聚焦   |  设计视图   |增强编辑栏   | 工作簿和表管理器   |  资源库（自动文本）|  日期提取   |  汇总工作表  |  加密/解密单元格   | 按列表发送邮件   |  超级筛选   |   特殊筛选（筛选粗体单元格/斜体/删除线……） ......
精选 15 工具集：12 文本工具（添加文本，删除特定字符，……）|   50+ 图表 类型（甘特图，……）|   40+ 实用公式（基于生日计算年龄，……）|   19 插入工具（插入二维码，从路径插入图片，……）|   12 转换工具（小写金额转大写，汇率转换，……）|   7 合并和拆分工具（高级合并行，分割单元格，……）|……更多
在您的首选语言中使用 Kutools – 支持英语、西班牙语、德语、法语、中文及 40+ 种其他语言！

使用 Kutools for Excel 大幅提升您的 Excel 技能，体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能，助您提升生产力、节省时间。立即点击此处，获取您最需要的功能……

Office Tab 为 Office 带来标签式界面，让您的工作更轻松

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
  • 在同一个窗口的新标签页中打开并创建多个文档，而非在新窗口中。
  • 将您的工作效率提升 50%，每天减少数百次鼠标点击！

所有 Kutools 插件，一个安装程序

Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro，非常适合需要跨多个 Office 应用高效协作的团队。

ExcelWordOutlookTabsPowerPoint
  • 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
  • 一个安装程序，一个许可证— 几分钟内完成设置（支持 MSI）
  • 协同效果更佳— 在多个 Office 应用中实现高效协同
  • 30 天全功能试用— 无需注册，无需信用卡
  • 超值之选— 比单独购买插件更省钱