Tomás Vásquez Fórum

Enviado: **Ter Abr 05, 2016 5:31 pm**

Tenho uma planilha com um código macro que acessa uma pagina de um site, e nessa pagina existem 2 (dois) botões sem ID e não consigo encontar um código que simule o Click no 2º botão, o botão "Consultar". Segue abaixo o codigo fonte da pagina dos dois botões, o que esta em vermelho é o do botão de meu interesse:

<input type="button" value="Voltar" class="botao" onclick="window.location='inicial.action';" style="margin-right:0"></input>
   
<input type="button" onclick="validaFormConsulta();" value="Consultar" class="botao" style="margin-right:0"></input>

qual codigo ideal para identificar esse botão e simular o click para que eu posso obter a consulta na pagina da web?

Enviado: **Qua Abr 06, 2016 12:40 pm**

Elvis, boa tarde.

Olha, vendo os códigos dos dois botões que você postou, a melhor maneira ativar um dos elementos abaixo, seria criando uma rotina que passa por todos os elementos Input da página, testando o Atributo Value do elemento. Seria algo assim:

Código: Selecionar todos

Dim objElementCol As Object
Dim objElement As Object

Set objElementCol = ie.document.getElementsByTagName("input")

For Each objElement In objElementCol
    If objElement.Value = "Consultar" Then
        objElement.Click
        Exit For
    End If
Next objElement

Usando esse código como base, fica fácil para você conseguir adaptar seu código.

Teste e nos retorne o resultado.

Forte abraço!!!

Enviado: **Sex Abr 08, 2016 8:56 am**

Bom dia Mikel
O codigo que voce me passou deu certo, muito obrigado, voce me ajudou a fechar um projeto que estava a muitos dias trabalhando no escritório
Deus te abençoe!

Enviado: **Sex Abr 08, 2016 9:42 am**

Elvis, bom dia.

Cara, muito bom saber que pude ajudar.

Depois, para facilitar a identificação, de esse tópico como resolvido.

Dessa forma, se outras pessoas buscarem um problema parecido, vão saber que o mesmo já foi finalizado.

Forte abraço e excelente final de semana.

Tomás Vásquez Fórum

BOTÃO SUBMIT SEM ID

BOTÃO SUBMIT SEM ID

Re: BOTÃO SUBMIT SEM ID

Re: BOTÃO SUBMIT SEM ID

Re: BOTÃO SUBMIT SEM ID