Prezados, boa noite!
Estou acessando um site através do VBA e efetuando login, consegui realizar a parte de entrar no site e digitar login e senha, porém tem um botão "login" para clicar, do qual não consegui achar o código certo, tentei vários.
Codigo:
Estou acessando um site através do VBA e efetuando login, consegui realizar a parte de entrar no site e digitar login e senha, porém tem um botão "login" para clicar, do qual não consegui achar o código certo, tentei vários.
Codigo:
- Código:
Sub Comando2_Click()
Dim Nomeusuario As String
Dim Senhausuario As String
Dim Ambienteusuario As String
Dim Dc_URL As String
Dim objIE As New InternetExplorer ' Referencie "Microsoft internet controla"
'Abre o IE
objIE.Visible = True
Nomeusuario = "Usuário"
Senhausuario = "Senha"
Dc_URL = "https:"
objIE.Navigate2 Dc_URL
Do Until objIE.ReadyState = READYSTATE_COMPLETE
DoEvents
Loop
objIE.Document.all("chave").innerText = Nomeusuario
objIE.Document.all("password").innerText = Senhausuario
objIE.Document.all.Item("ambiente").selectedIndex = "2"
Set objIE = Nothing
End Sub
Última edição por Curty123 em 9/1/2019, 19:32, editado 1 vez(es)