A Userform control can have a _Click event.
In that case the 'calling control' is evident.

Private Sub Commandbutton1_Click()
  msgBox commandbutton1.name
End Sub