Excel - Sera mucho pedir?

Lo que quiero es que mientras se ejecute una macro, se muetre una imagen GIF animada en alguna celda, y al finalizar la macro desaparezca.

Primero que nada aclara algo, la images, y objetos en general, NO ESTAN dentro de las celdas.

Ahora, primero que nada, debes agregar un control webbrowser en tu hoja. Si no tienes activo ese control, agregelo con la opcion "mas controles adicionales" de la barra de controles. Ahi debe estar como "microsoft webbrowser" o como "Explorador web de microsofot". Si aun asi, no lo vez, probablemenrte debas activar la "referencia" : "micorosoft internet controls"

Una vez agregado en tu hoja, dale derecho y en "Propiedades", en "Visible", elige "False"

Luego, tu macro deberia quedar algo asi:

Sub Gif_animado()

Hoja1.WebBrowser1.Visible = True

Hoja1.WebBrowser1.Navigate _
"C:Documents and SettingsAVALENCIAMis documentosMis imágenespcmaln.gif"

For a = 1 To 100000
DoEvents
Next a

Hoja1.WebBrowser1.Visible = False

End Sub

- Donde dice "Hoja1", se hace referencia al modulo de la hoja, no al nombre de la hoja.

- Obviamente, en la ruta tu coloca la tuya, es decir, donde se encuentra el gif animado que deseas se vea en tu hoja.

- El DoEvents es basico, sino no se vera la animacion del gif mientras va corriendo la macro

- Tambien es obivo que donde yo he colocado el FOR - NEXT, pues, tu deberias colocar tu codigo

Abraham