Extraction d'une page internet dans excel

Fermé
echec et math Messages postés 102 Date d'inscription mardi 20 septembre 2005 Statut Membre Dernière intervention 15 décembre 2011 - 17 déc. 2009 à 17:07
echec et math Messages postés 102 Date d'inscription mardi 20 septembre 2005 Statut Membre Dernière intervention 15 décembre 2011 - 21 déc. 2009 à 10:41
Bonjour,

Dans Visual Basic en utilisant le script suivant:

Sub partants()
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;https://www.geny.com/partants-pmu/2009-12-17-cabourg-pmu-prix-des-peupliers_c266388", _
Destination:=Range("B1"))

.BackgroundQuery = True
.TablesOnlyFromHTML = False
.Refresh BackgroundQuery:=False
.SaveData = True
End With
End Sub

... j'arrive à copier dans excel la page du site "geny.com" correspondant à la rubrique "chevaux".

Comment faire pour copier dans excel de la même façon les pages correspondant aux rubriques :
- Statistiques des jockeys
- Statistiques des entraîneurs
- Records

Lorsque je clic sur ces différents onglets, c'est toujours le même lien qui s'affiche alors que la page est différente.

Merci pour vos réponses.
A voir également:

1 réponse

echec et math Messages postés 102 Date d'inscription mardi 20 septembre 2005 Statut Membre Dernière intervention 15 décembre 2011
21 déc. 2009 à 10:41
Bonjour,
Pas de solution ?
0