Excel - Mi macro no funciona si lo asigno a un boton

Tengo el siguiente macro que si lo ejecuto atraves del menu funciona , pero si lo asigno a un boton no funciona ( este macro agrega una hoja al final de cualquier libro y te pregunta el nombre que le vas a dar)


Sub Macro2()

Dim x As String

ActiveSheet.Select
ActiveSheet.Copy after:=ActiveSheet

x = InputBox("Ingrese el nombre de la nueva hoja")

ActiveSheet.Name = x

End Sub

Si el botón lo creas en el entorno de Excel (la hoja) seleccionas el botón, con el botón derecho del mouse seleccionas Ver código.

Le agregas la siguiente línea de código y listo.

Call Macro2

Tambien te sirve utilizar esto en el evento click del boton

Run("Macro2")

Has usado un boton de cual de las barras de herramientas: CUADRO DE CONTROLES o de FORMULARIOS?????????

Para la hoja de excel tiene que ser de FORMULARIOS

Abraham