【ExcelVBA】セルをダブルクリックするとマクロを実行

質問

基本的なことだと思うのですが・・・

ExcelVBAで

' Keyboard Shortcut: Ctrl+a
'
この様に「Ctrl」＋「a」で実行するマクロを作りました。
これを「D1」のセルをダブルクリックするとマクロを実行するようにするには
どのようにすると良いでしょう。

宜しくお願いいたします。

回答No.1

Wendy02 · ベストアンサー

こんにちは。
通常は、シートモジュールで、以下のようになるかと思いますが、そうでない場合は、ThisWorkbook やClass を使います。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address <> "$D$1" Then Exit Sub
Cancel = True
　'実行(中身を登録)
End Sub

お礼

早速ご回答頂きまして有難うございます。

あっさりと大変上手く行きました。