如何删除Excel中的所有按钮或命令按钮？ Author: Siluvia Last Modified: 2025-07-31 本文介绍了如何从Excel的当前工作表中删除所有窗体控件按钮或命令按钮。
通过全选删除所有按钮，包括窗体控件按钮和命令按钮 通过VBA代码删除所有按钮，包括窗体控件按钮和命令按钮 使用VBA代码删除所有窗体控件按钮或命令按钮
通过全选删除所有按钮，包括窗体控件按钮和命令按钮请按照以下步骤操作以从当前工作表中删除所有按钮（包括窗体控件按钮和命令按钮）。
1. 单击“开发工具”选项卡下的“设计模式”以启用设计模式。参见截图：
2. 选择其中一个命令按钮并按 Ctrl + A 键以选择当前工作表中的所有按钮。
3. 按 Delete 键删除所有选定的按钮。
备注：如果此工作表中有其他对象，它们也会被选中。
通过VBA代码删除所有按钮，包括窗体控件按钮和命令按钮此外，您可以应用以下VBA脚本来删除Excel当前工作表中的所有按钮。
1. 打开包含要删除按钮的工作表，然后按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。
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 Sub3. 按 F5 键运行代码。所有按钮，包括窗体控件按钮和命令按钮，都会立即从当前工作表中删除。
使用VBA代码删除所有窗体控件按钮或命令按钮如果您只想从当前工作表中删除所有窗体控件按钮或所有命令按钮，可以尝试以下VBA代码来实现。
1. 打开包含要删除按钮的工作表，然后按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。
2. 在 Microsoft Visual Basic for Applications 窗口中，单击“插入”>“模块”，然后将以下VBA代码复制到代码窗口中。
VBA代码：从当前工作表中删除所有窗体控件按钮
Sub Clear_ButtonsActiveSheet()
ActiveSheet.Buttons.Delete
End SubVBA代码：从当前工作表中删除所有命令按钮
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 Sub3. 按 F5 键运行代码。
随后，所有窗体控件按钮或所有命令按钮会立即从当前工作表中删除。
相关文章： 如何在Excel中通过命令按钮自动插入空白新行？ 如何在Excel中使用命令按钮将当前工作表保存为PDF文件？ 如何在Excel中通过命令按钮更新或插入（当前）日期和时间？ 如何在Excel中使用命令按钮更改指定单元格的值？ 最佳 Office 办公效率工具 🤖 Kutools AI 助手：基于智能执行，彻底革新数据分析 ｜生成代码｜创建自定义公式｜分析数据并生成图表｜调用 Kutools Functions… 热门功能：查找、选中项的背景色或标记重复项｜删除空行｜合并列或单元格且不丢失数据｜四舍五入（无公式）... 高级 LOOKUP：多条件查找 (VLookup)｜多值查找 (VLookup)｜多表查找 (VLookup Across Multiple Sheets)｜模糊查找 (Fuzzy Lookup)... 高级下拉列表：快速创建下拉列表｜依赖型下拉列表｜多选下拉列表... 列管理器：添加指定数量的列 ｜移动列 ｜切换隐藏列的可见状态｜ 比较区域及列... 特色功能：网格聚焦｜设计视图｜增强编辑栏｜工作簿 & 工作表管理器｜资源库（自动文本）｜日期提取｜合并数据｜加密/解密单元格｜按列表发送电子邮件｜超级筛选｜特殊筛选（筛选粗体/倾斜/删除线等）... 热门15 大工具集：12 款文本工具（添加文本、删除特定字符等）｜50+ 种图表 类型（甘特图等）｜40+ 实用公式（基于生日计算年龄等）｜19 款插入工具（插入二维码、按路径插入图片等）｜12 种转换工具（小写金额转大写、汇率转换等）｜7 款合并与分割工具（高级合并行、分割单元格等）｜...更多精彩等你发现 使用 Kutools，支持您的首选语言——包括英语、西班牙语、德语、法语、中文及40 多种其他语言！用 Kutools for Excel 加速你的 Excel 技能，体验前所未有的高效办公。 Kutools for Excel 提供300 多项高级功能，助您提升效率，节省大量时间。点击此处，获取你最需要的功能...
查看更多 Kutools for Excel详细信息... 免费下载... Office Tab 为 Office 带来标签式界面，让你的工作更加轻松 在 Word、Excel、PowerPoint 启用标签式编辑和阅读 在同一窗口的新标签中打开和创建多个文档，无需新建窗口。 办公效率提升50%，每天帮你减少上百次鼠标点击！ 查看更多 Office Tab详细信息... 免费下载...