KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

如何移除 Excel 中的所有按鈕或命令按鈕?

作者Siluvia修改日期

在某些 Excel 工作表中,您可能已新增許多按鈕(例如表單控制項按鈕或 ActiveX 命令按鈕),用來執行不同任務或自動化流程。隨著時間推移,因應工作表設計調整、範本清理,或準備檔案與他人共用,您可能需要移除這些按鈕。若多個按鈕分散於工作表各處,手動逐一刪除不僅耗時,還容易出錯。本文將介紹幾種實用方法,協助您快速、高效地從 Excel 當前工作表中一次清除所有表單控制項按鈕或命令按鈕,輕鬆整理活頁簿,避免其他使用者產生不必要的互動或混淆。

使用「定位條件」移除所有按鈕
透過全選方式一次移除所有按鈕(含表單控制項按鈕與命令按鈕)
透過 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 不僅可防止意外刪除其他圖形,還能確保多個工作表間的一致性。惟需具備基本 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 指令碼將大幅節省寶貴時間!進行大量刪除前,務必先備份活頁簿,以確保重要內容可隨時還原。


相關文章:

最佳 Office 生產力工具

🤖KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行     產生程式碼  建立自訂公式    分析資料並產生圖表  呼叫增強函數……
熱門功能尋找、醒目提示或標記重複值     刪除空白行     合併列或儲存格而不遺失資料     不使用公式的四捨五入……
高級 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 中啟用分頁式編輯與閱讀功能,以及 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 天完整功能試用— 無需註冊,無需信用卡
  • 超值之選— 比單獨購買各增益集更省費用