problema al cambiar caption de commandbutton
Publicado por mjukkinderna (1 intervención) el 04/08/2009 11:07:31
Hola,
Tengo un problema cuando creo una commandbutton y le quiero cambiar la caption en la misma macro. El commandbutton lo creo asi:
ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False _
, DisplayAsIcon:=False, Left:=601.5, Top:=356.25, Width:=6, Height:=6 _
).Select
Y le cambio la caption así:
ActiveSheet.CommandButton1.Caption = "test"
El problema es que si corro el código, me crea la commandbutton pero me da fallo al llegar a la línea de cambio de caption.
En cambio si corro una macro a parte, una vez ya ha finalizado el código principal donde se crea el botón, sí que me efectua el cambio de caption.
Alguien me puede echar una mano?
Gracias.
Tengo un problema cuando creo una commandbutton y le quiero cambiar la caption en la misma macro. El commandbutton lo creo asi:
ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False _
, DisplayAsIcon:=False, Left:=601.5, Top:=356.25, Width:=6, Height:=6 _
).Select
Y le cambio la caption así:
ActiveSheet.CommandButton1.Caption = "test"
El problema es que si corro el código, me crea la commandbutton pero me da fallo al llegar a la línea de cambio de caption.
En cambio si corro una macro a parte, una vez ya ha finalizado el código principal donde se crea el botón, sí que me efectua el cambio de caption.
Alguien me puede echar una mano?
Gracias.
Valora esta pregunta


0