Bom dia Amigo,
Então o Tomas tem muitos videos no youtube falando passo a passo, da uma olhadinha...
Vou deixar aqui uma noção para você aqui..
Baixa o Selenium 2.09 , atualiza o chormedriver dele, tomas tem videos falando sobre isso e como instalar.
Dim driver As New Selenium.ChromeDriver
Set driver = New ChromeDriver
' driver.AddArgument ("--headless") para usar em segundo plano
driver.Get "
https://aqui você coloca o endereço do site"
While Busy
Application.Wait TimeSerial(Hour(Now), Minute(Now), Second(Now) + 1) ' aqui espera o site Carregar
DoEvents:
Wend
driver.FindElementByName("j_username").SendKeys Range("I5") ' aqui eu to puxando o usuário da range I5
driver.FindElementByName("j_password").SendKeys Range("I6") ' aqui eu to puxando o Senha da range I5
' pode existir vários métodos para encontrar o elemento.
'driver.FindElementByID
'driver.FindElementByLinktext
'(Dentro do parenteses tu coloca o elemento inspecionado
While Busy
Application.Wait TimeSerial(Hour(Now), Minute(Now), Second(Now) + 1)
DoEvents:
Wend
driver.FindElementByName("loginBtn").Click ' Clicando no botão logar
'Lembrando que precisa inspencionar
End Sub
Me fala ai qual site do quer logar?
Att.