Discussion :

[patricktoulon]

Bonjour
un début de code pour toi avec le pilotage pur et simple de IE
et les commentaires te disant le reste a faire
Bonne continuation

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Sub test()
Dim IE
Set IE = CreateObject("internetexplorer.application")
IE.Navigate "https://www.mobilities.com/backoffice/fr/reservation/csv-export/view_type/reservation"
IE.Visible = True
Do: DoEvents: Loop While IE.readystate <> 4 'Or IE.busy
IE.document.getelementbyid("login").innertext = "toto@titi.fr"
IE.document.getelementbyid("password").innertext = "motdepasse"
IE.document.getelementbyid("submit").Click
'si je comprend bien a partir d'icci apres un moment on a la fentre de telechargement en bas de pas c'est bien ca ?
'il va te il va faloir utiliser les api de simulation de touche ,en effet le sendkey de VBA fonctionne dans l'application excel
'et parfois dans les application externes mais ca ne fonctionne pas a tout les coups
'On éxécute l'ouverture du fichier
'CreateObject("WScript.Shell").SendKeys "{TAB}~", True
       ' Application.Wait (Now + TimeValue("0:00:06"))
'ActiveWorkbook.ActiveSheet.Range("A10").Select
'si tu fait une recherche tu trouvera divers exemples sur ce sujet contribution de marc et moi meme et meme sur ce forum
' BONNE RECHERCHE
End Sub

[clementmarcotte]

Garde le donc sur ton disque local ton maudit classeur au lieu de croire les pelleteux de nuages qui promettent la lune en transformant les ordinateurs en vulgaires terminaux et en gaspillant la bande pâssante.

[patricktoulon]

Bonjour clement

Garde le donc sur ton disque local ton maudit classeur au lieu de croire les pelleteux de nuages qui promettent la lune en transformant les ordinateurs en vulgaires terminaux et en gaspillant la bande pâssante.

tu es un peu hors sujet la !!!
visiblement il n'est pas propriétaire du classeur et doit le télécharger une fois ou régulièrement

[damienqu]

Bonjour à tous,

Désolé, j'étais surchargé cette semaine, mais j'ai atteint mon but lundi grâce à la piste de Marc. Il m'a suffit d'un redémarrage de mon PC pour que mon workbook_deactivate se déclenche correctement.
Maintenant mes next steps: renouveller la procédure pour le téléchargement d'autres fichiers. A voir comment faire ça compte tenu de la fin de la première macro. Je regarderai ça en début de semaine prochaine.

Merci et bon WE à tous

Damien