VBA Selenium - manipuler une page chrome

Version imprimable

Bonjour,
Désolé de vous déranger, j'ai recherché en vain sur internet pour trouver la solution à mon problème et je débute tout juste sur Selenium.
J'aurai souhaité vous demander si vous saviez comment via VBA/Selenium
- Simuler une saisie au clavier des touches Tabulation et Entrée ?
- Copier le contenu du résultat dans une cellule ?
A toute fin utile, vous pourrez trouver ci-joint mon fichier avec mon code
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 Sub Check_Adress_Eligibility_Chrome() Application.ScreenUpdating = False Dim employee_adress As String employee_adress = "35 avenue d'Enghien / 93800 / Epinay-sur-Seine" Dim driver As New WebDriver driver.Start "chrome", "https://sig.ville.gouv.fr/recherche-adresses-qp-polville" driver.get "https://sig.ville.gouv.fr/recherche-adresses-qp-polville" Application.Wait Now + TimeValue("00:00:02") driver.findElementByName("addressInput").SendKeys employee_adress 'XXX cliquer TAB + ENTREE sur le résultat parce que le champs est en fait une liste déroulante driver.findElementById("validateSearch").Click 'XXX Copier le contenu du champs Résultat "adresseSearchResult" dans la cellule A1 Sheets("Emplois_Francs_One_Check").Range("A1").Value = driver.findElementByName("adresseSearchResult").Text Application.ScreenUpdating = True End Sub
En vous remerciant par avance.

Bien à vous.

Rani

17/09/2020, 15h57
Menhir

[QUOTE=DGDLB69;11619106]- Simuler une saisie au clavier des touches Tabulation et Entrée ?
Avec la méthode OnKey de Application.
Lire ça : https://docs.microsoft.com/fr-fr/off...lication.onkey

Merci Menhir pour la piste mais en tapant
Code:

1 2 3 Application.OnKey "{TAB}" Application.OnKey "~"
ou encore
Code:

1 2 3 driver.OnKey "{TAB}" driver.OnKey "~"
ça ne fonctionne pas malheureusement.

hello,
le "ENTER" ne fonctionne pas dans la liste, il faut cliquer mais alors il ne faut pas qu'il y ait de popup affiché à ce moment-là.
L'adresse à chercher que tu as fournie ne produit aucun résultat chez moi.
Je ne vois pas le champ adresseSearchResult

voilà un code qui fonctionne chez moi :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public Sub TestSelenium() 
    Dim employee_adress As String
    employee_adress = "10 RUE DE LA PREVOYANCE 75019 Paris 19e Arrondissement"
 
    Dim driver As New WebDriver
    driver.Start "chrome", "https://sig.ville.gouv.fr/recherche-adresses-qp-polville"
    driver.Get "https://sig.ville.gouv.fr/recherche-adresses-qp-polville"
    Application.Wait Now + TimeValue("00:00:02")
    ' code pour se débarasser du popup de cookies (accepter)
    driver.FindElementByXPath("//button[@id='tarteaucitronPersonalize']").Click
    driver.FindElementByName("addressInput").SendKeys employee_adress
    driver.SendKeys Chr(9)
    driver.FindElementByXPath("//a[contains(@class,'addressAutocomplete')]").Click
    driver.FindElementById("validateSearch").Click

Ami calmant, J.P

18/09/2020, 23h37
DGDLB69

Hello Jurassic Pork,
Merci beaucoup ça résout complètement mon premier point de blocage, j'ai ajouté un temps de pause supplémentaire pour que cela passe à tous les coups après avoir renseigné l'adresse.
Le résultat apparaît dans la div class "synthese_carto_popover" avec le message "L’adresse recherchée est située dans le quartier prioritaire"