メインコンテンツへスキップ

Kutools for Office — 1つのスイート、5つのツールで、もっと多くのことを成し遂げましょう。

Excelで全てのボタンまたはコマンドボタンを削除するにはどうすればよいですか?

Author Siluvia Last modified

いくつかのExcelワークブックでは、異なるタスクを実行したりプロセスを自動化するために、フォームコントロールボタンやActiveXコマンドボタンなど、多くのボタンを追加しているかもしれません。時間が経つにつれて、ワークシートのデザイン変更、テンプレートのクリーンアップ、ファイルを共有するための準備などの理由で、これらのボタンを削除する必要が出てくる場合があります。ワークシート全体に複数のボタンが散らばっている場合、それらを手動で削除するのは非常に時間がかかり、エラーも発生しやすくなります。この記事では、アクティブなワークシートからすべてのフォームコントロールボタンやコマンドボタンを効率的に削除するためのいくつかの実用的な方法を紹介します。これにより、ワークブックを迅速に整理し、他のユーザーにとって不要な操作や混乱を防ぐことができます。

『移動』機能を使ってすべてのボタンを削除する
すべてのボタン(フォームコントロールボタンとコマンドボタンを含む)を選択して削除する
VBAコードを使用してすべてのボタン(フォームコントロールボタンとコマンドボタンを含む)を削除する
VBAコードを使用してすべてのフォームコントロールボタンまたはコマンドボタンを削除する


『移動』機能を使ってすべてのボタンを削除する

特にフォームコントロールボタンを削除する最も簡単で実用的な方法は、Excelの『移動』機能を使うことです。この方法ではVBAスクリプトが必要なく、手動での選択よりもより多くの制御を望むユーザー向けです。フォームコントロールに対して最適に動作しますが、ActiveXコントロールは削除されません。

1. アクティブなワークシート内の任意のセルを選択し、F5キーを押して『移動』ダイアログを開きます。ダイアログボックス内の『特別選択』をクリックしてください。

2. 次のダイアログで『オブジェクト』を選択し、OKをクリックします。これにより、ワークシート上のすべての描画オブジェクト(フォームコントロールボタンを含む)が即座に選択されます。

3. 選択されたすべてのボタンおよびオブジェクトを削除するには、Deleteキーを押します。

ヒント: この方法では、すべてのオブジェクト(図形、テキストボックス、画像など)が選択され、フォームコントロールだけではなくなります。他の重要なオブジェクトがある場合は、Deleteを押す前にワークシートを慎重に確認してください。フォームコントロールボタンとActiveXコントロールの両方がある場合、この方法では前者のみが削除されます。ActiveXコントロールを削除するには、VBAを利用する必要があります。


すべてのボタン(フォームコントロールボタンとコマンドボタンを含む)を選択して削除する

アクティブなワークシートからすべてのボタン(フォームコントロールとコマンドボタンを含む)を一度に選択して削除するシンプルな方法です。これは、直接的かつ視覚的なアプローチを好むユーザー、またはワークシート上からすべてのインタラクティブなオブジェクトを迅速にクリアしたいユーザーに適しています。コーディングの知識や特別な設定は必要なく、すべてのコントロールを一括で削除するようなシンプルなクリーンアップ作業に理想的です。

この方法では、ワークシート上のすべてのオブジェクト(図形、チャート、画像、その他のコントロールなど)が選択され、削除される可能性があります。ボタン以外の特定のアイテムを残したい場合には注意が必要です。

1. リボン上で「開発」>「デザインモード」をクリックしてデザインモードを有効にします。このステップにより、フォームコントロールボタンとActiveXコントロールの両方が選択および管理可能になります。「開発」タブが表示されない場合は、「ファイル」>「オプション」>「リボンのユーザー設定」で有効にする必要があります。

A screenshot of Excel showing how to enable Design Mode on the Developer tab

2. ワークシート上のいずれかのボタン(フォームコントロールまたはコマンドボタン)をクリックして選択します。その後、Ctrlキーを押しながらAキー(Ctrl + A)を押して、アクティブなワークシート内にあるすべてのボタンおよびその他のオブジェクトを選択します。

A screenshot showing all buttons selected in Excel using Ctrl + A

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コマンドボタンが即座に削除されます。

これらのコードを使用する際、ニーズに合った正しいコードを実行していることを確認してください。これらのスクリプトは一度に1つのボタンタイプのみを対象とします。両方のタイプのボタンがあり、それぞれを削除したい場合、2つのスクリプトを連続して実行します。コード実行後にワークシートレイアウトを確認し、他の図形や埋め込みオブジェクトが含まれている場合、意図したコントロールのみが削除されたことを確認してください。予期せぬコンテンツの損失を防ぐために、VBAを使用する前には必ずワークブックを保存してください。

まとめると、Excelではボタンを削除するさまざまな方法(手動、『移動』機能、VBAスクリプト)が提供されており、状況に応じて最適な方法を選ぶことができます。特定のボタンが削除できない問題が発生した場合は、ワークシートが保護されていないか、コントロールがグループ化されたオブジェクトの一部ではないかを確認してください。一括削除や、頻繁に複数のシートからコントロールを削除する必要がある場合、VBAスクリプトを使用することで大幅な時間短縮が可能です。大量の削除を行う前には、常にバックアップを取って重要なコンテンツを復元できるようにしておくことを忘れないでください。


関連記事:

最高のオフィス業務効率化ツール

🤖 Kutools AI Aide:データ分析を革新します。主な機能:Intelligent Executionコード生成カスタム数式の作成データの分析とグラフの生成Kutools Functionsの呼び出し……
人気の機能重複の検索・ハイライト・重複をマーキング空白行を削除データを失わずに列またはセルを統合丸める……
スーパーLOOKUP複数条件でのVLookup複数値でのVLookup複数シートの検索ファジーマッチ……
高度なドロップダウンリストドロップダウンリストを素早く作成連動ドロップダウンリスト複数選択ドロップダウンリスト……
列マネージャー指定した数の列を追加列の移動非表示列の表示/非表示の切替範囲&列の比較……
注目の機能グリッドフォーカスデザインビュー強化された数式バーワークブック&ワークシートの管理オートテキスト ライブラリ日付ピッカーデータの統合セルの暗号化/復号化リストで電子メールを送信スーパーフィルター特殊フィルタ(太字/斜体/取り消し線などをフィルター)……
トップ15ツールセット12 種類テキストツールテキストの追加特定の文字を削除など)50種類以上のグラフガントチャートなど)40種類以上の便利な数式誕生日に基づいて年齢を計算するなど)19 種類の挿入ツールQRコードの挿入パスから画像の挿入など)12 種類の変換ツール単語に変換する通貨変換など)7種の統合&分割ツール高度な行のマージセルの分割など)… その他多数
Kutoolsはお好みの言語で利用可能 ― 英語、スペイン語、ドイツ語、フランス語、中国語、その他40以上の言語に対応!

Kutools for ExcelでExcelスキルを強化し、これまでにない効率を体感しましょう。 Kutools for Excelは300以上の高度な機能で生産性向上と保存時間を実現します。最も必要な機能はこちらをクリック...


Office TabでOfficeにタブインターフェースを追加し、作業をもっと簡単に

  • Word、Excel、PowerPointでタブによる編集・閲覧を実現
  • 新しいウィンドウを開かず、同じウィンドウの新しいタブで複数のドキュメントを開いたり作成できます。
  • 生産性が50%向上し、毎日のマウスクリック数を何百回も削減!

全てのKutoolsアドインを一つのインストーラーで

Kutools for Officeスイートは、Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proをまとめて提供。Officeアプリを横断して働くチームに最適です。

Excel Word Outlook Tabs PowerPoint
  • オールインワンスイート — Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proが含まれます
  • 1つのインストーラー・1つのライセンス —— 数分でセットアップ完了(MSI対応)
  • 一括管理でより効率的 —— Officeアプリ間で快適な生産性を発揮
  • 30日間フル機能お試し —— 登録やクレジットカード不要
  • コストパフォーマンス最適 —— 個別購入よりお得