【VBA】チェックボックスの状態が変わった瞬間、リアルタイムで処理を実行する方法

2025年8月16日

はじめに

VBAのユーザーフォームで、チェックボックスがオン/オフされた瞬間に、何らかの処理をリアルタイムで実行したい、という場面は非常に多くあります。例えば、「『その他』のチェックボックスがオンになったら、詳細入力用のテキストボックスを有効化する」といったインタラクティブな動作です。

このようなリアルタイムな応答は、チェックボックスの _Click() イベント（または _Change() イベント）を利用することで実装できます。

この記事では、ユーザーがチェックボックスをクリックして状態を変更した瞬間に、別のコントロールの状態を変化させる、実践的なマクロの作り方を解説します。

チェックボックスの状態変更で処理を実行するVBAサンプルコード

このマクロは、EnableDetails_CheckBox という名前のチェックボックスがクリックされたときに、Details_TextBox という名前のテキストボックスの有効/無効を切り替えます。

ユーザーフォームのコード

このコードは、ユーザーフォームのコードモジュールに直接記述します。

フォーム上に「チェックボックス」と「テキストボックス」を配置します。
チェックボックスの (Name) を EnableDetails_CheckBox に、Caption を 詳細を入力する に変更します。
テキストボックスの (Name) を Details_TextBox に変更し、初期状態としてプロパティウィンドウで Enabled を False に設定しておきます。
配置した「チェックボックス」をダブルクリックすると、VBEに Private Sub EnableDetails_CheckBox_Click() というコードが自動生成されるので、その中に処理を記述します。

' 「詳細を入力する」チェックボックス(EnableDetails_CheckBox)がクリックされたときに実行されるイベント
Private Sub EnableDetails_CheckBox_Click()

    ' チェックボックスの現在の状態（True/False）を、
    ' そのままテキストボックスのEnabledプロパティに代入する
    Me.Details_TextBox.Enabled = Me.EnableDetails_CheckBox.Value

End Sub

コードの解説

`Private Sub EnableDetails_CheckBox_Click()`

これは特別な名前のイベントプロシージャで、EnableDetails_CheckBox というコントロールがクリックされた瞬間に、中のコードが自動的に実行されます。チェックボックスの状態がオンになってもオフになっても、クリックされるたびにこのイベントが発生します。

`Me.Details_TextBox.Enabled = Me.EnableDetails_CheckBox.Value`

この一行だけで、リアルタイムな連動を実現しています。

Me.EnableDetails_CheckBox.Value: クリックされたチェックボックスの現在の状態を取得します。オンであれば True、オフであれば False です。
Me.Details_TextBox.Enabled = ...: テキストボックスの Enabled プロパティ（有効/無効）に、取得したチェックボックスの状態を直接代入しています。

これにより、

チェックボックスがオン (Value = True) → テキストボックスは有効 (Enabled = True)
チェックボックスがオフ (Value = False) → テキストボックスは無効 (Enabled = False) という、直感的でスマートな連動が実現できます。

`_Change()` イベントとの違い

チェックボックスには _Click() の他に _Change() イベントもあります。どちらもチェック状態の変更で発生するため、多くの場合同様に使えますが、_Click() は「ユーザーがマウスでクリックした」というアクションに紐づくのに対し、_Change() は「コントロールの Value プロパティがコード等で変更された」場合にも発生するという違いがあります。ユーザーの直接的な操作に反応させたい場合は _Click() を使うのが一般的で分かりやすいでしょう。