É, o Selenium fez barulho na comunidade do VBA. Pelo menos isso foi o que deu pra sentir, refletido tanto em questões no fórum, como em comentários no youtube e pedidos de serviço.
O fato é que o selenium tem crescido muito enquanto biblioteca e não só para o VBA. Tudo está muito bem explicado numa série de vídeos que gravei, de comentários a tutoriais (links no fim do artigo).
Por fim, como um auxílio para a migração do SeleniumVBA para o SeleniumBasic, explicado no vídeo “Selenium Basic Já”, gravei mais um tutorial com uma pincelada no código utilizando a nova biblioteca, que você confere abaixo:
Abaixo também segue o código utilizado para referência.
Dim driver As WebDriver Sub ConsultaODolar() Set driver = New ChromeDriver driver.Get "http://www.dolarhoje.com" Dim nacional As WebElement Set nacional = driver.FindElementById("nacional") If nacional Is Nothing Then MsgBox "Elemento não encontrado" Else MsgBox nacional.Value End If driver.Quit End Sub Sub VaiProGoogle() Set driver = New ChromeDriver driver.Get "http://www.google.com" Application.Wait Now + TimeValue("00:00:01") Dim busca As WebElement, form As WebElement Set busca = driver.FindElementById("lst-ib") Set form = driver.FindElementById("tsf") If Not busca Is Nothing Then busca.SendKeys InputBox("Sua busca", "Google", "") form.Submit Else MsgBox "Elemento não encontrado" End If End Sub |
Bom proveito!
Usando o Selenium VBA para extrair informações da Web
► https://www.youtube.com/watch?v=hk-65p2ivvQ&t=47s
Atualizando o ChromeDriver manualmente para o SeleniumBasic
► https://www.youtube.com/watch?v=8fFnr-hmTW8
Selenium Basic já!
► https://www.youtube.com/watch?v=WLP7QqgS8CA
Outros Links
SeleniumBasic
► https://florentbr.github.io/SeleniumBasic/
ChromeDriver
► https://sites.google.com/a/chromium.org/chromedriver/