Preenchendo campo em formulario web no internet explorer

[KaduOliveira]

Amigos,

Após vasculhar a internet, não encontrei a solução do meu problema.

Utilizo o Excel 2007 e a referência Microsoft Internet Controls está ativada.

Estou tentando fazer o login no site: www.v2smv.com.br

utilizando o seguinte código:

Sub Logar()

Dim ie As New InternetExplorer
Set ie = CreateObject("InternetExplorer.application")


    With ie

         .Visible = True
         .Navigate ("http://v2smv.com.br")
         
         While .Busy Or .ReadyState <> 4: DoEvents: Wend
         
         .Document.getElementById("txtLogin").Focus
         .Document.getElementById("txtLogin").Value = "usuario"
        
         .Document.getElementById("txtPassword").Focus
         .Document.getElementById("txtPassword").Value = "senha"
    
    End With
End Sub

Ao chegar no comando Focus, apresenta o erro 2110 abaixo:

Retirando essa parte do focus, a macro roda, mas não preenche os campos do formulário.

Outro ponto é que não consigo achar o id do botão ok para dar o comando click

Sabem o que pode estar acontecendo?

Abraços.

[KaduOliveira]

Alguém tem uma idéia de como fazer?

Enviado de meu GT-I9300 usando Tapatalk