Excel não executa código Selenium

[Jonathas Henrique]

Boa noite galera, estou com um problema todo código que tento executar no vba do excel o mesmo não funciona.

exemplo no código:

Sub teste()

Dim Selenium As New SeleniumWrapper.WebDriver
Dim By As New By, Assert As New Assert, Verify As New Verify, Waiter As New Waiter

driver.Start "firefox", "https://indexes.nasdaqomx.com/Account/LogOn"

Quando a macro começa a executar já da erro apresentando uma mensagem:
"Erro de compilação:
O tipo definido pelo usuário não foi definido"
após no depurador ele deixa selecionado o trecho do código "Selenium As New SeleniumWrapper.WebDriver"
Não entendi se faltou eu instalar alguma coisa ou o que poderia estar acontecendo.

[webmaster]

Jonathas,

Adicionou a referência ao Selenium Wrapper?

Att

[Jonathas Henrique]

Sim Tomas, lá em ferramentas... referências e selecionar "Selenium Type Library"

[Mikel Silveira Fraga]

Jonathas, bom dia e seja bem vindo ao fórum.

Cara, seu erro é muito simples, uma questão de observação. Veja abaixo:

- Nessa parte do código, você esta declarando a variável com o nome "Selenium", mas do tipo SeleniumWrapper.Webdriver.

Código: Selecionar todos

Dim Selenium As New SeleniumWrapper.WebDriver

- Porém, na hora de utilizar a variável para abrir o navegador, você esta utilizando o nome como "driver".

Código: Selecionar todos

driver.Start "firefox", "https://indexes.nasdaqomx.com/Account/LogOn"

Nas duas linhas, a variável precisa possuir o mesmo nome, seja ele "Selenium" ou "driver". Independente de qual escolha, o mesmo nome terá que ser utilizado em todo momento que referenciar no código, o objeto SeleniumWrapper.Webdriver.

Teste e nos retorne.
Abraços.

[Jonathas Henrique]

Obrigado pela dica Mikel, mas aquele código eu tinha usado somente como exemplo pois tinha pegado ele pronto em um site que estava falando sobre o assunto ai coloquei ele somente como exemplo mesmo.

Criei outro código para ilustrar e continua dando problema no mesmo lugar quando mando o código ser executado no excel.
Fiz uma gravação com o selenium de uma pesquisa simples do google e mesmo assim continua dando o mesmo problema relatado.

segue o cógido:

Public Sub Untitled()
Dim selenium As New SeleniumWrapper.WebDriver
selenium.start "firefox", "https://www.google.com.br/"

selenium.open "/webhp?hl=pt-BR"
selenium.type "id=lst-ib", "selenium"
selenium.click "name=btnG"

selenium.stop
End Sub

[Mikel Silveira Fraga]

Jonathas, bom dia.

Cara, não sei se você entendeu a colocação dos endereços nas funções Start e Open do Selenium.

Quando você utiliza a função Start e resolve informar um endereço "base", esse fica registrado na URL do Navegador. No seu modelo ficou assim: "https://www.google.com.br/".

Quando você chama a função Open, e adiciona um novo endereço, esse se torna o complemento do endereço base. Nesse caso, é adicionado ao endereço: "/webhp?hl=pt-BR".

Agora, quando juntamos os dois endereços, da forma como você fez, ficaria assim: "https://www.google.com.br//webhp?hl=pt-BR". Observe que ficou duas barras seguidas no endereço e, talvez por este motivo, esteja ocorrendo o erro.

Retire a "/" do final do endereço na função Start e veja se vai funcionar.

Ps: não testei o seu código, pois estou sem o Selenium instalado nesse PC.

Fico no aguardo.

[fulokorj@gmail.com]

Boa noite a todos.

Na minha aconteceu a mesma coisa:

Código: Selecionar todos

Public Sub Untitled()
  Dim selenium As New SeleniumWrapper.WebDriver
  selenium.start "firefox", "https://www.cifraclub.com.br/"

  selenium.open "/"
  selenium.click "css=div.g-hr.g-mb"
  selenium.click "css=strong.top-txt_primary"
  selenium.click "//ol[@id='top-music']/li[2]/a/span"
  selenium.click "//ol[@id='top-music']/li[3]/a/span"

  selenium.stop
End Sub

Ela foi gravada dessa forma, porém quando fui executar deu o mesmo erro. Como consigo resolver?
já add a referencia selenium tipe library.
até tirei o "/" da linha 3, mas não resolveu.
meu office é 2013 64 bits, e meu selenium é 2.9.1 com a extensão para vba "VBA/VBS code formatters for Selenium IDE"
Preciso entender como faço pra executar essa para poder avançar para outras mais complexas.

Se alguem puder me ajudar, agradeço

[fulokorj@gmail.com]

Boa noite a todos.

Na minha aconteceu a mesma coisa:

Código: Selecionar todos

Public Sub Untitled()
  Dim selenium As New SeleniumWrapper.WebDriver
  selenium.start "firefox", "https://www.cifraclub.com.br/"

  selenium.open "/"
  selenium.click "css=div.g-hr.g-mb"
  selenium.click "css=strong.top-txt_primary"
  selenium.click "//ol[@id='top-music']/li[2]/a/span"
  selenium.click "//ol[@id='top-music']/li[3]/a/span"

  selenium.stop
End Sub

Ela foi gravada dessa forma, porém quando fui executar deu o mesmo erro. Como consigo resolver?
já add a referencia selenium tipe library.
até tirei o "/" da linha 3, mas não resolveu.
meu office é 2013 64 bits, e meu selenium é 2.9.1 com a extensão para vba "VBA/VBS code formatters for Selenium IDE"
Preciso entender como faço pra executar essa para poder avançar para outras mais complexas.

Se alguem puder me ajudar, agradeço

1 minuto depois:como vi que a referência que tem não é "seleniumwhaper" e sim "selenium tipe library" então procurei e achei:

Código: Selecionar todos

Dim selenium As New selenium.FirefoxDriver

Com isso consegui passar dessa linha e abrir o firefox(só abrir, sem o site na barra de endereços).
Mas logo em seguida deu esse erro:

[heldimpinheiro]

Estive com o mesmo problema e resolvi ao habilitar em Ferramentas -> Referências -> SeleniumWrapper Type Library