Animación gif

[sanlorens]

Buenos días, estoy haciendo una aplicación en la cual me gustaría que al iniciarse el archivo de excel, saliera la

animación que tengo y cuando terminara saltase a una hoja llamada "inicio". Gracias

[shahuinto]

Primero que nada, debes agregar un control webbrowser en tu userform (suponiendo que ahí lo tienes). Si no tienes activo ese control, agregelo con la opción "más controles adicionales". Ahí debe estar como "microsoft webbrowser" o como "Explorador web de microsofot". Si aun así, no lo vez, probablemenrte debas activar la "referencia" : "micorosoft internet controls"

Una vez agregado en tu userform, agrega esto en el código del userform:

Private Sub UserForm_Activate() 

WebBrowser1.Navigate Thisworbook.Path & "\migif.gif" 

End Sub [/CODE]

Eso si, el userform debe ser "corrido" como no modal

Userform1.show VbModeless o con su propiedad ShowModal en False

Debes mandar el archivo de excel y el gif animado dentro de una misma carpeta.

"\migif.gif" es el gif que puedes cambiarle el nombre que teng el tuyo