Excelのセルをワンクリックでクリア!VBAボタン作成の4ステップ

本記事では、ExcelのセルをワンクリックでクリアできるVBAマクロボタンの作成方法を、4つの簡単なステップで解説します。以下のサンプルデータセットを使用します。

ステップ1:セルをクリアするVBAモジュールの作成

• 「開発」タブに移動し、「Visual Basic」をクリックします。

また、Alt + F11キーを押すことでも「Microsoft Visual Basic for Applications」ウィンドウを開くことができます。

• メニューの「挿入」から「標準モジュール」を選択します。

ステップ2:モジュールへのVBAコード挿入

開いたモジュールウィンドウに、目的に応じて以下のいずれかのVBAコードを入力します。

① 書式を保持してセルの内容のみクリアするコード

Sub Clear_Cell_With_Button()
Dim rng As Range
Set rng = Application.InputBox(Prompt:="Select the Range of Cell", Title:="Exceldemy", Type:=8)
rng.Select
Selection.ClearContents
End Sub

② 書式も含めてセルをクリアするコード

Sub Clear_Cell_With_Button_including_Format()
Dim rng As Range
Set rng = Application.InputBox(Prompt:="Select the Range of Cell", Title:="Exceldemy", Type:=8)
rng.Select
Selection.Clear
End Sub

③ セル自体を削除するコード

Sub Delete_Cell_With_Button()
Dim rng As Range
Set rng = Application.InputBox(Prompt:="Select the Range of Cell", Title:="Exceldemy", Type:=8)
rng.Select
Selection.Delete
End Sub

Clear・Delete・ClearContentsの違い

この3つのコマンドには以下のような違いがあります。

ステップ3:セルをクリアするボタンの作成

• 「開発」タブに移動します。
• 「挿入」をクリックし、「ボタン(フォームコントロール)」を選択します。

• ボタンを配置したい場所でドラッグして四角形を描画します。

• 「マクロの登録」ウィンドウが自動的に開きます。
• 先ほど作成したマクロを選択します。
• 「OK」をクリックします。

• 指定した場所にマクロボタンが表示されます。ボタンを右クリックして「テキストの編集」から、名前を「Clear Contents Only(内容のみクリア)」に変更します。

• 同様の手順で、残りの2つのコード用のボタンとして「Clear Cells Including Format(書式ごとクリア)」と「Delete Cells(セルの削除)」も作成します。

ステップ4:VBAマクロボタンでセルをクリアする実行方法

• 「Clear Contents Only」ボタンをクリックすると、選択したセルの値のみがクリアされます。

• ダイアログウィンドウが表示されるので、クリアしたい範囲を選択して「OK」をクリックします。

• 選択したセルの値はクリアされましたが、書式はそのまま保持されています。

• 「Clear Cells Including Format」ボタンをクリックすると、セルの値と書式の両方がクリアされます。
• クリアしたいセル範囲を選択して「OK」をクリックします。

選択したセルが完全に空白になりました。

• 「Delete Cells」ボタンをクリックし、削除したいセル範囲を選択します。

選択したセルが削除され、下のセルが上方向にシフトしました。

まとめ

VBAマクロとフォームボタンを組み合わせることで、面倒な操作をワンクリックで実行できるようになります。「値のみクリア」「書式ごとクリア」「セルの削除」という3種類の処理を使い分けて、日々のExcel作業の効率化にぜひお役立てください。

関連記事

• Excel VBAで数式を残しながらセルの内容をクリアする方法
• Excel VBAで名前付き範囲の内容をクリアする方法
• Excel VBAでセルや列を削除して左にシフトする方法
• Excel VBA:特定の値が含まれるセルだけ内容をクリアする方法