Intento agregar un gif animado en un archivo excel pero al copiar y pegar no se mueve, no realiza la animación, Puede alguien decirme que debo hace para conseguir que se mueva???
lo primero que hacemos es ir al menú Insertar / Imagen, pero eso no funciona. Esto se debe a que la animación está hecha para varias imágenes y la importación solo se limita a la primera.
Para que la animación funcione, hay que insertar la imagen en un Control.
* Para insertar el control, vamos al menú Ver / Barra de herramientas / Cuadro de controles
* Activa el primer botón “Modo diseño”
* Elige el último botón (el del martillo), luego selecciona "Navegador Web Microsoft"
* Luego delimita un área para insertar la imagen.
* Desactiva el primer botón “Modo diseño” y la barra de herramientas.
* Finalmente, en el editor VBA y en la ventana de la hoja concernida pegar el siguiente código:
Private Sub Worksheet_Activate()
WebBrowser1.Navigate "X:\ruta completa de la imagen.GIF"
End Sub
* Cambia la página activa de la hoja Excel, luego regresa a la hoja de animación para ver la imagen animada.
* Para insertar otras animaciones, debemos seguir el mismo procedimiento, agregando cada vez una línea con el código de arriba, teniendo en cuenta el número del control atribuido.
WebBrowser2.Navigate "X:\ruta completa de la imagen.GIF"
* Para insertar otras animaciones en otras páginas, debemos proceder de la misma manera agregando el procedimiento VBA en cada página concernida.
Si el tamaño no cuadra con la imagen, debemos corregir:
* Vamos al menú Ver / Barra de herramientas / Cuadro de controles
* Activamos el primer botón ”Modo diseño”
* Redimensionamos el marco y sus parámetros.
* Desactivar el primer botón ”Modo diseño” y la barra de herramientas
Answers & Comments
Verified answer
lo primero que hacemos es ir al menú Insertar / Imagen, pero eso no funciona. Esto se debe a que la animación está hecha para varias imágenes y la importación solo se limita a la primera.
Para que la animación funcione, hay que insertar la imagen en un Control.
* Para insertar el control, vamos al menú Ver / Barra de herramientas / Cuadro de controles
* Activa el primer botón “Modo diseño”
* Elige el último botón (el del martillo), luego selecciona "Navegador Web Microsoft"
* Luego delimita un área para insertar la imagen.
* Desactiva el primer botón “Modo diseño” y la barra de herramientas.
* Finalmente, en el editor VBA y en la ventana de la hoja concernida pegar el siguiente código:
Private Sub Worksheet_Activate()
WebBrowser1.Navigate "X:\ruta completa de la imagen.GIF"
End Sub
* Cambia la página activa de la hoja Excel, luego regresa a la hoja de animación para ver la imagen animada.
* Para insertar otras animaciones, debemos seguir el mismo procedimiento, agregando cada vez una línea con el código de arriba, teniendo en cuenta el número del control atribuido.
WebBrowser2.Navigate "X:\ruta completa de la imagen.GIF"
* Para insertar otras animaciones en otras páginas, debemos proceder de la misma manera agregando el procedimiento VBA en cada página concernida.
Si el tamaño no cuadra con la imagen, debemos corregir:
* Vamos al menú Ver / Barra de herramientas / Cuadro de controles
* Activamos el primer botón ”Modo diseño”
* Redimensionamos el marco y sus parámetros.
* Desactivar el primer botón ”Modo diseño” y la barra de herramientas