Cómo mostrar u ocultar imagenes mediante una macro (Word)
Autor Mónica
19.08.2007
Y seguimos con nuestra serie video - tutoriales dedicados a desgranar VBA para Word. En este articulo o mostramos como crear una barra de herramientas que nos servirá para ocultar o mostrar las imagenes que tengamos en nuestro documento a golpe de ratón. Para ello emplearemos una macro que asociaremos a nuestra barra de herramientas. Comencemos.
A continuación os dejamos el código que hemos empleado para efectuar la función que os ilustramos en el video.
Sub OcultarImagen()
With ActiveDocument
On Error GoTo mio
.Shapes(1).Visible = msoFalse
.Shapes(2).Visible = msoFalse
End With
Exit Sub
mio:
MsgBox "en este documento no hay imagenes para ocultar"
Resume Next
End Sub
Sub VerImagen()
On Error GoTo mio
With ActiveDocument
.Shapes(1).Visible = msoTrue
.Shapes(2).Visible = msoTrue
End With
Exit Sub
mio:
MsgBox "no existen imagenes en este documento para ver "
Resume Next
End Sub
En nuestra sección de descargas teneis un archivo de word de ejemplo que podreis descargar.
Y eso es todo por ahora, espero que os sea de utilidad.
Muchos besos
Monica - Tux
Filtro
No comments...
Escribir un comentario
Por favor, mantenga el asunto de los mensajes relevantes al tema del artículo.
Los ataques verbales personales serán eliminados.
Por favor, no emplee comentarios para promocionar su sitio web. Este tipo de mensajes serán eliminados