ExcelVBA ダブルクリック イベントを取得して自動処理を実行させる方法

以下のようなシーンで利用されます。

1.セル編集の代わりにアクションを実行
ダブルクリックでデータを入力したり、特定の操作（例えば、他のシートへのジャンプや計算結果の表示など）を自動化する。

2.フォームやメッセージの表示
特定のセルをダブルクリックすると、フォームを開いたり、ポップアップメッセージを表示する。

3.セルの内容を条件に応じて操作
例えば、ダブルクリックでセルの背景色を変更したり、他のセルに値をコピーする。

Excel VBA ダブルクリック イベント｜使い方とポイント

Option Explicit

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    ' A1セルをダブルクリックしたときにメッセージを表示
    If Not Intersect(Target, Range("A1")) Is Nothing Then
        MsgBox "A1セルがダブルクリックされました！"
        Cancel = True  ' セルの編集を無効にする
    End If
End Sub

特定のセル範囲をダブルクリックで背景色を変更

Option Explicit

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    ' A1:A10のセルをダブルクリックした場合に背景色を変更
    If Not Intersect(Target, Range("A1:A10")) Is Nothing Then
        Target.Interior.Color = RGB(255, 255, 0)  ' 背景色を黄色に変更
        Cancel = True  ' セルの編集を無効にする
    End If
End Sub

ExcelVBAのダブルクリック イベントは、ユーザーがセルをダブルクリックしたときに特定の処理を自動化できる便利な機能です。特定のセルに対するアクションや、データ入力を簡素化する場面で活用できます。シートの編集動作を管理するため、操作範囲をしっかりと指定しておくことが重要です。