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:
- Clique na guia Desenvolvedor, botão Inserir
- Clique no botão inserir->Mais Controles
- 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.
Marcos Rieper
