Página 1 de 1

Clicar em um botão no Internet Explorer

Enviado: 13 Fev 2021 às 17:58
por BrunoLuiel
Bom dia colegas! Eu estou engatinhando ainda no VBA e confesso ficar quase doente quando não consigo terminar um pequeno projeto, mas enfim, Estou tentando fazer uma consulta em lote de entradas de notas fiscais, e até agora consegui dar alguns passos, mas estou travado no momento de clicar em no botão "consulta nota" e não consegui, segue abaixo o código que uso:
Código: Selecionar todos
Sub buscador()

Dim L As Long
L = 2 ' insira esta chave de acesso para teste na célula A2: 35210243999630000124550020006076261793415090

Set Ie = CreateObject("InternetExplorer.application")

Ie.navigate "https://portalcontribuinte.sefin.ro.gov.br/Publico/consultaInternamentoNFe.jsp"
Ie.Visible = True

Do While Ie.busy And Ie.ReadyState <> 
DoEvents
Loop

Ie.document.getelementsbytagname("input")(0).Click 
Ie.document.getelementsbytagname("input")(2).Value = Cells(L, 1)
Ie.document.getelementsbyclassname("boton a")(0).Click 'Esta é a linha que não consigo clicar no botão que faz a consulta

End sub

Re: Clicar em um botão no Internet Explorer

Enviado: 15 Fev 2021 às 17:11
por osvaldomp
BrunoLuiel escreveu: 13 Fev 2021 às 17:58 Eu estou engatinhando ainda no VBA ...
Sugestão: adote a declaração obrigatória de variáveis nos seus projetos.
Testaí:

substitua esta linha
Ie.document.getelementsbyclassname("boton a")(0).Click 'Esta é a linha que não consigo clicar no botão que faz a consulta

por esta
Ie.document.Forms(0).Submit