Bonjour,
Je rencontre quelques difficultés pour extraire des nombres d'un tableau sur un site web sous VBA. J'ai réussi à extraire un nombre de ce site web mais c'était assez facile car il avait une "class" dans le code html.
Voici le site web : http://markets.businessinsider.com/c...onsrechte/EURO
Le code HTML qui m’intéresse est le suivant:
Je souhaite extraire les nombres située dans chaque <tr> pour le premier td <td>
Pour commencer j'ai réaliser ce petit code VBA:
Mon problème est que je n'arrive même pas extraire un nombre d'une ligne, étant donné qu'il a que la balise <td> et pas de class associée. J’aurais donc besoin d'aide pour extraire le nombres du premier <td>, et je pense que je pourrais étendre pour l'ensemble par la suite.
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
20
21
22
23
24
25
26
27
28 Dim IE As Object ' Create InternetExplorer Object Set IE = CreateObject("InternetExplorer.Application") ' You can uncoment Next line To see form results IE.Visible = False ' URL to get data from IE.Navigate "http://markets.businessinsider.com/commodities/historical-prices/co2-emissionsrechte/EURO" ' Statusbar Application.StatusBar = "Loading, Please wait..." ' Wait while IE loading... Do While IE.Busy Application.Wait DateAdd("s", 1, Now) Loop Application.StatusBar = "Searching for value. Please wait..." Set l1 = IE.document.getElementsByClassName("table instruments").innerText ' Show IE IE.Visible = False ' Clean up Set IE = Nothing
Merci
Partager