Boa tarde
Segue a tela de erro a qual me refiro. Fiz a correção das celulas, erro bobo! Depois que acesso ao site, eu fecho o navegador e volto a planilha e escolho outra pessoa fisica para consultar, mas dá o erro.
Na citação "egundo lugar, você ainda está utilizando o Internet Controls no lugar do Selenium.", não sei como trocar, com muito custo modifiquei o codigo para fazer tudo isso hehe. Como eu consigo fazer essas alterações que me indicou?
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Preencher formulario internet com dados excel
Re: Preencher formulario internet com dados excel
- Anexos
-
- mensagem de erro apos a consulta, e troca de pessoa fisica.png (15.3 KiB) Exibido 7896 vezes
Re: Preencher formulario internet com dados excel
Victor, comece assistindo este vídeo do Tomás Vásquez, troque sua ferramenta de trabalho corretamente e depois podemos verificar o erro.
https://www.youtube.com/watch?v=hk-65p2ivvQ
Se tiver problemas para instalar e usar, existem outros tópicos sobre o assunto no fórum já tratando disso.
https://www.youtube.com/watch?v=hk-65p2ivvQ
Se tiver problemas para instalar e usar, existem outros tópicos sobre o assunto no fórum já tratando disso.
-
- Acabou de chegar
- Mensagens: 1
- Registrado em: Qua Jul 31, 2019 3:31 pm
Re: Preencher formulario internet com dados excel
Olá,
O que falta no seu código é a habilitação/ativação das Bibliotecas:
https://www.aprenderexcel.com.br/2017/v ... te-com-vba
Aqui estão as dicas.
O que falta no seu código é a habilitação/ativação das Bibliotecas:
https://www.aprenderexcel.com.br/2017/v ... te-com-vba
Aqui estão as dicas.
Re: Preencher formulario internet com dados excel
ative as bibliotecas Microsoft HTML Object Library e Microsoft Internet Controls
com esse codigo da pra logar no site varias vezes se tiver os dados validos (cpf_cnpj, codigo, senha)
depois de logar estou fechando o navegador (IE.quit) e reabrindo na consulta seguinte, vai ter que desenvolver o restante do codigo antes disso, o que vai fazer depois que logar, etc.
Dim IE As InternetExplorer
Set IE = New InternetExplorer
i = 9
While Plan1.Cells(i, "A") <> ""
link = "https://cav.receita.fazenda.gov.br/aute ... o-esquerdo"
IE.navigate link
IE.Visible = True
Do While IE.Busy = True Or IE.readyState <> 4: DoEvents: Loop
cpf_cnpj = Plan1.Cells(i, "C")
codigo = Plan1.Cells(i, "D")
senha = Plan1.Cells(i, "E")
IE.document.all("NI").innerText = cpf_cnpj
IE.document.all("CodigoAcesso").innerText = codigo
IE.document.all("Senha").innerText = senha
For Each avancar In IE.document.getElementsByClassName("submit")
avancar.Click
Next
Do While IE.Busy = True Or IE.readyState <> 4: DoEvents: Loop
IE.Quit
i = i + 1
Wend
com esse codigo da pra logar no site varias vezes se tiver os dados validos (cpf_cnpj, codigo, senha)
depois de logar estou fechando o navegador (IE.quit) e reabrindo na consulta seguinte, vai ter que desenvolver o restante do codigo antes disso, o que vai fazer depois que logar, etc.
Dim IE As InternetExplorer
Set IE = New InternetExplorer
i = 9
While Plan1.Cells(i, "A") <> ""
link = "https://cav.receita.fazenda.gov.br/aute ... o-esquerdo"
IE.navigate link
IE.Visible = True
Do While IE.Busy = True Or IE.readyState <> 4: DoEvents: Loop
cpf_cnpj = Plan1.Cells(i, "C")
codigo = Plan1.Cells(i, "D")
senha = Plan1.Cells(i, "E")
IE.document.all("NI").innerText = cpf_cnpj
IE.document.all("CodigoAcesso").innerText = codigo
IE.document.all("Senha").innerText = senha
For Each avancar In IE.document.getElementsByClassName("submit")
avancar.Click
Next
Do While IE.Busy = True Or IE.readyState <> 4: DoEvents: Loop
IE.Quit
i = i + 1
Wend