Ouvrir internet par macro
Résolu
Bonjour
Sur Microsoft EDGE
Je cherche un spécialiste pour écrire une macro EXCEL
pour ouvrir automatiquement internet sur une course du PMU
à partir d'une URL
par exemple….. https://www.pmu.fr/point-de-vente/15032021/r1/c1/
puis ouvrir le bouton "RESULTATS"
Ensuite, la même macro pour ouvrir sur le bouton "RAPPORTS DEFINITIFS"
Grand merci par avance pour votre aide
Bonne journée
Sur Microsoft EDGE
Je cherche un spécialiste pour écrire une macro EXCEL
pour ouvrir automatiquement internet sur une course du PMU
à partir d'une URL
par exemple….. https://www.pmu.fr/point-de-vente/15032021/r1/c1/
puis ouvrir le bouton "RESULTATS"
Ensuite, la même macro pour ouvrir sur le bouton "RAPPORTS DEFINITIFS"
Grand merci par avance pour votre aide
Bonne journée
Configuration: Windows / Edge 89.0.774.54
2 réponses
-
Bonjour,
Pour ouvrir une page web vous pouvez essayez ça:Sub Ouvrir_Page()
navigate = "https://www.pmu.fr/point-de-vente/15032021/r1/c1/"
Shell ("C:\Program Files (x86)\Microsoft\Edge\Application\msedge.exe" & navigate)
End Sub
Cdlt.-
Bonjour T3chNOg3n,
Merci pour ton intérêt..... Ta proposition marche pas et je pense que le programme doit être plus compliqué.
Pour exemple, suis le lien donné (super sympa) par yg_be . C'était la macro que j'utilisais depuis des années pour ouvrir le PMU par IE. Malheureusement, le PMU depuis le 15 mars ne veut plus fonctionner par IE.
Bonne journée -
Contributeur@dadacourse"ne veut plus fonctionner"?
as-tu une erreur dans le code VBA? -
@yg_bePas d'erreur, mais le PMU affiche une page avec seulement
"Internet Explorer n'est plus supporté par les sites du PMU" -
@dadacourseJ'ai juste donné la syntaxe pour ouvrir une page web ... Et effectivement ça ne marche pas. Voilà une alternative:
Sub Ouvrir_Page()
CreateObject("WScript.Shell").Run ("https://www.pmu.fr/point-de-vente/15032021/r1/c1/")
End Sub
Sinon, les controles utilisé dans la macro pour IE ne sont plus prises en charge sur Edge et les autre navigateurs récents, il faut tout refaire. -
@T3chN0g3nT3chN0g3n...... Waouuuu, c'est génial, ça marche très bien avec Edge et en une seule ligne... bravo et surtout un grand merci.
Un petit truc supplémentaire (désolé d'insister). Tu remarqueras sur la page PMU 3 boutons (sur la même ligne): "RESULTATS", "RAPPORTS DEFINITIFS" et "ENJEUX"
La macro ouvre systématiquement sur "RESULTATS"
Il faudrait une 2ème macro (à part de la 1ère) qui ouvre sur "RAPPORTS DEFINITIFS" et je serais comblé
Merci encore pour ton attention
Bonne journée à toi
-
