Gif Animado no Excel e Browser de Internet

Objetivo: Demonstrar como inserir no Excel um Gif animado ou fazer uma chamada a uma página da internet.

Para inserir um gif animado no Excel ou inserir um browser de internet no Excel você deve seguir os seguintes procedimentos:

1. Clique na guia Desenvolvedor, botão Inserir

2. Clique no botão inserir->Mais Controles

3. Selecione o objeto Microsoft Web Browser, clique em OK e e desenhe um objeto na planilha

4. Ainda na Guia Desenvolvedor clique no botão Visual Basic

5. Insira o código abaixo clicando no objeto Plan1 na árvore de objeto duas vezes :

         Private Sub Worksheet_Activate()

            WebBrowser1.Navigate "www.google.com.br"

         End Sub

6. Feche o Visual Basic

7. Na guia Desenvolvedor desmarque o botão Modo de Design

8. Clique em outra guia e retorne a esta

9. O objeto carregará a informação da página

10. Para carregar um gif o procedimento é o mesmo com a diferença que você deve determinar o caminho do arquivo

Private Sub Worksheet_Activate()

    WebBrowser1.Navigate "C:\Excel\Blog Rieper Excel\WebBrowser\gifs-futebol-1.gif"

End Sub

No download você tem estes dois exemplos e um browser que navega conforme o endereço digitado.