Foros del Web » Soporte técnico » Ofimática »

Macro para mostrar/ocultar imagen

Estas en el tema de Macro para mostrar/ocultar imagen en el foro de Ofimática en Foros del Web. Intenté buscar una macro que me ayudase a mostrar/ocultar una imagen al hacer click en un botón pero no consigo como. En primera, me gustaría ...
  #1 (permalink)  
Antiguo 24/08/2015, 09:08
Avatar de LanbreGroteo  
Fecha de Ingreso: agosto-2009
Ubicación: $Mx->['Veracruz']
Mensajes: 69
Antigüedad: 14 años, 11 meses
Puntos: 1
Pregunta Macro para mostrar/ocultar imagen

Intenté buscar una macro que me ayudase a mostrar/ocultar una imagen al hacer click en un botón pero no consigo como.

En primera, me gustaría que la imagen estuviera oculta y que al pulsar el botón ésta se visualice al usuario y se pueda volver a ocultar al pulsar ese mismo botón. Les pongo el código que intenté

Código vb:
Ver original
  1. Sub Macro1()
  2.     With ActiveSheet.Shapes("Rounded Rectangle 4").TextFrame2.TextRange.Characters
  3.         If .Text = "Hide" Then
  4.             .Text = "Show"
  5.             ActiveSheet.Shapes("Picture 1").Visible = False
  6.         Else
  7.             .Text = "Hide"
  8.             With ActiveSheet.Shapes("Rounded Rectangle 4")
  9.             ActiveSheet.Shapes("Picture 1").Left = .Left + .Width
  10.             ActiveSheet.Shapes("Picture 1").Top = .Top + .Height
  11.             ActiveSheet.Shapes("Picture 1").Visible = True
  12.             End With
  13.         End If
  14.     End With
  15. End Sub

Aquí, la imagen debe estar en la misma Hoja y la esconde al pulsar el botón... Me gustaría que fuera al revés, que la imagen no se visualizara en primera instancia hasta hacer clic en el botón y ¿será que se pueda llamar a la imagen desde otra hoja?

¡De antemano, muchas gracias!
__________________
Et credo in Serpentem, mysterium mysteriorum. In nomen eius Baphomet
  #2 (permalink)  
Antiguo 24/08/2015, 15:51
Avatar de Triby
Mod on free time
 
Fecha de Ingreso: agosto-2008
Ubicación: $MX->Gto['León'];
Mensajes: 10.106
Antigüedad: 15 años, 11 meses
Puntos: 2237
Respuesta: Macro para mostrar/ocultar imagen

Hay dos formas de ocultar la imagen:

1. En la ventana de propiedades cambia el valor de visibilidad de True a False
2. Cambiar la visibilidad cuando se activa la hoja

Sí, se puede hacer referencia a la imagen desde otra hoja:

Código vb:
Ver original
  1. NombreDeHoja.Shapes("Nombre de imagen").Visible = False

En teoría, tu código debería mostrar/ocultar la imagen alternadamente.
__________________
- León, Guanajuato
- GV-Foto

Etiquetas: excel, imagenes, macros
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 13:45.