Macro para cambiar el nombre de un botón activex
Necesito una macro que me permita cambiar el nombre de un botón activex sin necesidad de hacer clic o doble clic
1 respuesta
Entiendo que el botón se encuentra en una hoja, no en un Userform.
Para empezar tendrías que saber cuál es el botón a cambiar.
Te dejo como guia unas instrucciones donde en la primera devuelve el nombre del 2do objeto de la hoja 1.
Y la siguiente instrucción le cambia el nombre a ese objeto.
Sub cambiaBoton()
'x Elsamatilde
MsgBox Sheets(1).Shapes(2).Name
Sheets(1).Shapes(2).Name = "MiBoton"
End Sub
Sdos.
Elsa
Elsa el botón se encuentra en una hoja y lo que necesito es cambiar la propiedad caption con una macro es decir visualmente tome el nombre que yo elija después de ejecutar la macro me explico
¿Qué dice tu consulta: Macro para cambiar el nombre de un botón activex ... no dice el caption o el texto verdad?
Ahora estoy viajando... ni bien pueda te enviaré el código.
Sdos!
tenes razon Elsa perdonme me equivoque yo mil disculpas espero tu respuesta muchas gracias
Las siguientes instrucciones cambian el texto de 2 botones: el que ejecuta la macro que mencionas en tus aclaraciones y el texto de otro botón de comando.
Private Sub CommandButton1_Click()
MsgBox "Ya ejecuté la macro que fue llamada con este botón"
CommandButton1. Caption = "listo" 'cambia el texto en el mismo botón de la macro
CommandButton2.Caption = "EJECUTAR" 'CAMBIA EL TEXTO DE OTRO BOTÓN
End Sub
Como se trata de controles ActiveX dibujados en una hoja, la macro se coloca en el objeto HOJA.
Sdos!
