Extraire les donnes site VBA

Bonjour à tous,

Je souhaite extraire les donnes du site

http://www.comparateur-de-cotes.fr/comparateur/football/France-Ligue-1-ed3

J’utilise la méthode classique d’excel avec "données/ A partir du web" qui fonctionne très bien cependant est -il possible d’importer en plus la partie ou ce trouve les books ?

je sais que ca dois pas être simple (voir pas possible) car ce sont des images, mais peut être avec les liens qu'elle contienne ?

Merci d'avance

Bonjour,

c'est quoi les books ?

voici ce que j'ai récupéré

avec les logo

ou avec les noms

Merci beaucoup

c'est exactement ce que je cherchais, voir plus...... merci encore beaucoup

Bonjour,

Merci encore pour les codes du dessus qui m'ont était très utiles ,

j'en profite pour demander si c'est possible avec ce codes (ou un autres) d'importer le calendrier des rencontres sur la page

https://www.enligne.parionssport.fdj.fr/calendrier

j'essaie un peu avec le code des fichiers mais sans résultat

Merci pour votre aides

Bonjour,

les données sont contenues dans un json qu'il faut décoder ... je vais tenter le coup mais il me résiste !

Voici ce que l'on peut retirer des données ... cela ne me semble pas facilement exploitable ! Il faudrait re-écrire une mise en forme !!

edit : le site ayant changé cette version n'est plus d'actualité

Bonjour

Merci pour le code , je vais encore une fois demander votre aide (conseil)

avec le site - https://www.enligne.parionssport.fdj.fr/paris-football j essaie d'extraire les rencontres

j'ai trouver la partie du code source ou sont stocker les éléments mais encore une fois je bloque pour les extraire

merci de votre aide (je progresse petit a petit )

code dans le fichier joint avec le code source

Oups c est vrai normalement je passe par f8 pas à pas pour éviter cette erreurs 😬

Pour récupérer les infos, il y a plusieurs méthodes

1- PowerQuery : ne rend aucune info ici, dommage

2- GetElementByTagName : j'ai essayé mais la structure est tellement complexe ! un véritable labyrinthe

3- Ta méthode avec IE.navigate ... tu as du mal recopié car il manquait

Sub WaitIE(IE As InternetExplorer)
   'On boucle tant que la page n'est pas totalement chargée
   Do Until IE.ReadyState = READYSTATE_COMPLETE
      DoEvents
   Loop
End Sub

mais je ne récupère pas le texte voulu, mais l'intégralité de la page dans une fenêtre, donc ce n'est pas adapté.

4- Interprétation des données contenues dans le json, ce que je vais essayer de faire ...

suite du 4

On récupère bien les infos du json, mais après il faudrait passer encore une bonne quantité d'heures à remettre cela en forme et recoller les morceaux

Perso je ne vais pas plus loin, à toi de jouer si besoin