• Facebook
  • Google
  • RSS
Excel e Vba
  • Home
  • Primeiros Passos
  • Exercicios VBA
  • Torne-se Membro
  • Contato
  • Sobre
Escolha uma Página

Fazer login em um site usando VBA

Códigos Avançados, Códigos Prontos

 

Hoje segue mais um post sobre vba e internet, avançando sobre o post anterior no qual abria o browser padrão.
Para funcionar é necessário adicionar em referencias a biblioteca “Microsoft Internet Controls“.

Abaixo segue como fazer um login em um site usando VBA, já antecipo que para fazer este login é necessário saber o ID do usuário, ID da senha e do ID botão. Atenção não o Name!
Para conseguir pegar os ID’s você pode clicar com botão direito do mouse usando o Chrome e clicar em Inspecionar Elemento ou usando o IE com botão direito e clicar em exibir código fonte.

 

Imagem abaixo usando inspeção no chrome, e pegando os Id’s para colocar no código

 

 

 

 Segue código site com vba

 

Sub FazerLoginSite()

Dim IE As Object
Set IE = CreateObject("InternetExplorer.application")
With IE
.Visible = True
'abaixo coloquei o login do meu blog como exemplo...
.Navigate ("http://excelevba.com.br/download/login_teste.php")
While .Busy Or .ReadyState <> 4: DoEvents: Wend

.Document.getElementById("Ver qual ID do Login no html ").Focus
.Document.getElementById("Ver qual ID do Login no html ").Value = "COLOQUE SEU USUÁRIO AQUI"

.Document.getElementById("Ver qual ID do Password no html").Focus
.Document.getElementById("Ver qual ID do Password no html").Value = "COLOQUE SUA SENHA AQUI"

.Document.All("Verificar qual ID do Botão ").Click
While .Busy Or .ReadyState <> 4: DoEvents: Wend
Debug.Print .LocationURL
End With

End Sub

Para facilitar o aprendizado criei uma página simples para teste (“http://excelevba.com.br/download/login_teste.php”) cujo os dados de acesso voce encontra logo abaixo:

Usuario:  excelevba
Senha: internet_excelevba

 

 

Pesquisar

Tags

Abrir Com Vba Access Alertas e Avisos Aplicativos Vba Aprender Vba Artigos Banco De Dados Com Vba Classes Vba Colunas Computador Conceitos Copiar Com Vba Células Data Com Vba Diretorio Email Com Vba Erro Vba Excluindo Com Vba Formularios Funções Fórmulas Com Vba Impressao Interface Com Vba Internet Com Vba Linhas ListBox Com VBA Login Com Vba Matriz Mensagem Com Vba Menu Módulo Vba Planilha Salvar Segmentação de Dados Senha Com Vba Tabela dinamica Tempo Testar Com Vba Texto Usuário Com Vba Vba Automático Vba Mais Rápido

Excel e Vba

Categorias

  • Artigos VBA
  • Códigos Avançados
  • Códigos Desempenho
  • Códigos Design
  • Códigos Detonados
  • Códigos Prontos
  • Primeiros Passos

Páginas

  • Atualizações do Site
  • Contato
  • Exercicios VBA
  • Politica de Privacidade
  • Sobre
  • Torne-se Membro
  • Facebook
  • Google
  • RSS