Thema: Makroaufruf durch Doppelklick in Abhängigkeit von der Zelladresse

ClassModule: Tabelle1

Private Sub Worksheet_BeforeDoubleClick( _
   ByVal Target As Range, Cancel As Boolean)
   If Target.Row <> 7 Or Target.Column > 5 Then Exit Sub
   Cancel = True
   Select Case Target.Column
      Case 1: Call Makro1
      Case 2: Call Makro2
      Case 3: Call Makro3
      Case 4: Call Makro4
      Case 5: Call Makro5
   End Select
End Sub

StandardModule: basMain

Sub Makro1()
   MsgBox "Ich bin Makro1"
End Sub

Sub Makro2()
   MsgBox "Ich bin Makro2"
End Sub

Sub Makro3()
   MsgBox "Ich bin Makro3"
End Sub

Sub Makro4()
   MsgBox "Ich bin Makro4"
End Sub

Sub Makro5()
   MsgBox "Ich bin Makro5"
End Sub

Beiträge aus dem Excel-Forum zu den Themen Ereignis und BeforeDoubleClick