スキルアップ・問題解決なら、モーグにおまかせ！

サンプルでは、ワークシートがダブルクリックされたときに発生するBeforeDoubleClickイベントを使って、特定のセル（D5）がダブルクリックされたらメッセージボックスを表示する処理を行っています。

Private Sub Worksheet_BeforeDoubleClick _
           (ByVal Target As Range, Cancel As Boolean)
    
    With ActiveCell
        If .Row = 5 And .Column = 4 Then
            MsgBox "セルD5がダブルクリックされました"
        End If
    End With

End Sub