Puedes declarar una variable global entera que lleve la cuenta.
Para esto, simplemente declara la variable fuera de la función:
Public contador As Integer
Private Sub Ejemplo1_Click()
contador = contador + 1
MsgBox ("Se ha presionado " & contador & " veces")
End Sub
En tu macro debería quedar algo así:
Public contador As Integer
Sub TuMacro()
contador = contador + 1 ' suma 1 al contador
' Realizas más acciones del macro...
End Sub