Wenn mehrere Schaltflächen gleiche oder ähnliche Aktionen ausführen sollen, ist es viel einfacher, eine eigene Klasse zu schreiben, die dann mehrfach aufgerufen wird. Erstellen Sie dazu ein neues Klassenmodul (kein Formular und kein normales Modul!) namens clsButton und schreiben Sie den folgenden Code:

Option Explicit

Public WithEvents Nummer1 As MSForms.CommandButton
Public WithEvents Nummer2 As MSForms.CommandButton

Private Sub Nummer1_Click()
	MsgBox "Aktion Nr. 1 ausgeführt!"
End Sub

Private Sub Nummer2_Click()
	MsgBox "Aktion Nr. 2 wurde angeklickt!"
End Sub

Damit kennt Ihre Klasse sogar zwei mögliche Schaltflächen-Typen Nummer1 oder Nummer2 mit ihrem jeweiligen Click-Ereignis. Bei Bedarf kann jeder Typ auch um beliebige weitere Ereignisse erweitert werden.