pressionando um botão em uma página ie usando vba

0

Estou tentando manipular um site interno usando o vba, mas me deparei com um problema. Atualmente, meu script abaixo abre a página da Web e insere os valores da célula a1 na planilha1 na caixa de texto da página da Web. Meu problema é quando eu tento clicar no botão de pesquisa recebo a seguinte mensagem "run time error 438 O objeto não suporta esta propriedade ou método". Eu tentei algumas maneiras diferentes, mas nenhuma funciona. Também adicionei as propriedades do botão quando inspeciono o elemento. Obrigado!

<input name="Action" onclick="this.disabled=true; this.form.submit();" type="submit" value="Search">


Sub autoIE()

Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")

IE.navigate "webpage.com"

IE.Visible = True

While IE.Busy
DoEvents
Wend

IE.document.all("lookupNumberId").Value = ThisWorkbook.Sheets("Sheet1").Range("a1")

IE.document.all("Action").Click 'error 438

IE.document.getElementByName("Action").Click 'error 438

End Sub
    
por Eric 25.05.2018 / 18:37

1 resposta

0

Apenas uma sugestão da FYI BruceWayne funcionou para mim, mas eu só tive que mudar (0) para (1) .

IE.document.getElementsByName("Action")(1).Click

    
por 31.05.2018 / 18:39