nombre de botón

03/03/2008 - 17:08 por chiri | Informe spam
He puesto un botón en una hoja de cálculo, no en un formulario

¿cómo puedo saber su nombre para hacerlo no visible por código?

Siempre y cuando sea posible

Quizá la pregunta es simple, pero no he trabajado casi con excel y visual
Basic (seguro que Iván y Juan M, corroboran esta afirmación, y espero no
liarla ahora)
 

Leer las respuestas

#1 Ivan
03/03/2008 - 17:50 | Informe spam
hola Fernando

.. seguro que Iván y Juan M, corroboran esta afirmación, y espero no




liarla ahora) <<<



creo que del lio que hablas no eres tu precisamente el culpable (basta
con que eches un ojo a mis ultimas idas de olla en el otro hilo)

en cuanto a esto =>

He puesto un botón en una hoja de cálculo, no en un formulario





¿cómo puedo saber su nombre para hacerlo no visible por código?<<<



por un lado, tanto donde ver su nombre, como utilizarlo en codigo,
depende de que tipo de boton hayas insertado, es decir, si es de la
barra de herramientas 'Formularios' o de la de 'Cuadro de
controles' (para comprobarlo puedes ir al menu Ver => barras de
herramientas y ver la que tienes marcada de estas dos y/o maracarlas/
desmarcarlas alternativamente para ver cual es cual)

a) en el caso de que sea de la 1ª, Formularios <OJO: no tiene nada que
ver con los formularios VBA>), el nombre te aparecera en el cuadro
nombres, a la izq. de la barra de formulas y para utilizarlo deberas
utilizar la coleccion Shapes de la hoja de calculo, pej, asi =>

Sub OcultarBoton()
ActiveSheet.Shapes("Botón 1").Visible = False
End Sub

OJO-> pon el nombre tal cual lo veas (en este caso, acento/tilde
incluida)

b) si se trata de un boton de la barra Cuadro de controles, pej. en
el cuadro propiedades (con el boton 'Modo diseño' activado => click
secunderio => propiedades), podras ver su propiedad Name, que si no lo
has modificado suele ser CommandButtonN, donde n es el nº de
commandbutton incrustado

en este caso, creo que podrias usar tambien (aparte de shapes) la
propiedad OLEObjets de la hoja

Sub OcultarBoton2()
ActiveSheet.Shapes("CommandButton1").Visible = False
End Sub
Sub MostrarBoton()
Worksheets("Hoja1").OLEObjects("CommandButton1").Visible = True
End Sub

espero te ayude

un saludo
Ivan

Preguntas similares