Jump to content
Fórum Script Brasil
  • 0

Tecla {ENTER} - IE


tgrejanin
 Share

Question

Fala galera,

Estou precisando de uma ajuda com uma macro no Excel com interação com o IE
Eu preciso entrar em um site, colocar um certo valor em um campo de busca e apertar a tecla {Enter}, porém não estou conseguindo simular esse aperto do "Enter".
Não tem um botão "buscar" para que eu possa prosseguir.
Já tentei 

Application.SendKeys "~", True
SendKeys "~", ' True

Nada deu certo.

Sub Enter()

 Dim ie As InternetExplorer
 
    Set ie = New InternetExplorer
    ie.Visible = True
    ie.Navigate "http://www.loterias.caixa.gov.br/wps/portal/loterias/landing/lotofacil"

    While ie.Busy
    DoEvents
    Wend
        
    Do Until ie.ReadyState = READYSTATE_COMPLETE
    DoEvents
    Loop

    ie.Document.all("buscaConcurso").innerText = "1255" 'Exemplo
       
    ' Agora era preciso apertar o enter para completar a busca
    'Application.SendKeys "~", True

End Sub
Quem puder me ajudar eu agradeço.

Obrigado
Link to comment
Share on other sites

0 answers to this question

Recommended Posts

There have been no answers to this question yet

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share



  • Forum Statistics

    • Total Topics
      149.6k
    • Total Posts
      646.1k
×
×
  • Create New...