Discussion :

[leclercqth]

Rebonjour,

Dans le cadre d'une recherche que je mène pour mon université, je dois aller prendre dans la page suivante: http://fr.ulule.com/madatrek-3/ les informations suivantes:

Pièce jointe 190890
Pièce jointe 190891

Voici le code que j'ai pour le moment:

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
 
Sub Macro2()
    Dim IE As New InternetExplorer
    Dim Creator As String
    IE.Visible = False
    IE.navigate "http://fr.ulule.com/madatrek-3/"
    Do
    DoEvents
    Loop Until IE.readyState = READYSTATE_COMPLETE
    Dim Doc As HTMLDocument
    Set Doc = IE.document
 
 
    Next
End Sub

Je me rends bien compte que je demande pas mal d'information. Si cela prends trop longtemps d'écrire le reste du code. N'hésitez pas à me montrer l'exemple. j'adapterai pour le reste.

Merci d'avance,

Bonne soirée,

Thomas

[Marc-L]

Ici c'est le forum des formules de feuille de calculs ‼

Voir le tutoriel dédié au pilotage d'Internet Explorer et les exemples dans le bon forum …

[clementmarcotte]

Moi, ce que j'en dis, c'est que PatrickToulon répond à cette question une fois par semaine, ou presque.