Thema: Name der aufrufenden Schaltfläche abfragen

StandardModule: mHWH

Sub Schaltflaeche()
    Select Case Application.Caller
        Case "Schaltfläche 1"
            Range("A1").Select
        Case "Schaltfläche 2"
            Range("A51").Select
        Case "Schaltfläche 3"
            Range("A101").Select
    End Select
End Sub

StandardModule: Modul1

Sub Schaltflaeche()
   Select Case Application.Caller
      Case "Schaltfläche 1"
         Range("A1").Select
      Case "Schaltfläche 2"
         Range("A51").Select
      Case "Schaltfläche 3"
         Range("A101").Select
    End Select
End Sub

Beiträge aus dem Excel-Forum zu den Themen Dialog und CommandButton