Extraire éléments d'une page web via VBA
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:
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. :oops::roll:
Merci d'avance,
Bonne soirée,
Thomas
