Discussion :

[Petit_jean]

Bonjour à tous,

Afin de compléter ma formation VBA et de compléter un projet perso, je cherche à importer des datas depuis un site internet, vers un fichier excel.

Sur la page web suivante:



J'arrive bien à extraire le tableau de l'onglet ouvert de base ("chevaux": des chevaux partants via le code):

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
 
Sub Import()
    With ActiveSheet
        With .QueryTables.Add(Connection:="URL;" & "http://www.geny.com/partants-pmu/", Destination:=.Cells(1, 1))
            .Name = "mDFquery"
            .FieldNames = True
            .RowNumbers = False
            .FillAdjacentFormulas = False
            .PreserveFormatting = False
            .RefreshOnFileOpen = False
            .BackgroundQuery = False
            .RefreshStyle = xlInsertDeleteCells
            .SavePassword = False
            .SaveData = True
            .AdjustColumnWidth = True
            .RefreshPeriod = 0
            .WebSelectionType = xlSpecifiedTables
            .WebFormatting = xlWebFormattingRTF
            .WebTables = "tableau_partants"
            .WebPreFormattedTextToColumns = True
            .WebConsecutiveDelimitersAsOne = False
            .WebSingleBlockTextImport = False
            .WebDisableDateRecognition = False
            .WebDisableRedirections = False
            .Refresh BackgroundQuery:=False
        End With
    End With
End Sub

Mais je n'arrive pas à extraire le tableau des autres onglets ("statistique des drivers", "statistique des entraîneurs", "Records") car lorsque l'on va sur ces onglets, cela ne change pas le lien de la page et la procédure que j'ai écrite me permet uniquement d'extraire les tableaux présents initialement sur la page.

Pouvez vous m'aider ?

Merci d'avance.
Jean jean

[patricktoulon]

SALUT
cadeau
clique sur le bouton
choisi une course en colonne A avec le click droit de la sourie et choisi le tableau que tu veux récupérer dans le menu qui apparait

et joyeux noel

[Petit_jean]

Merci de ta réponse patricktoulon,

Ton code est très complexe par rapport à mon niveau mais le but principal de mon post était d'apprendre, je vais donc passer pas mal de temps a ça et aussi j'aimerais le simplifier à mon application.

Je vais donc sans doute être amener à te re-soliciter, je t'ai envoyé un message privé a ce sujet.

Encore Merci,
Jean

[Arkham46]

Bonjour,

1 - merci de ne plus donner de solution par fichier joint sans explications
2 - si seul l'avis de patricktoulon est intéressant, on peut supprimer la discussion et vous vous donnez vos 06 ?
3 - si effectivement les avis des autres ne vous intéressent pas, passez la discussion en résolu

C'est effectivement frustrant d'ouvrir un message, de lire la demande, et de s'apercevoir ensuite que c'est plus ou moins résolu et que la suite est privée.
Pour celui qui aurait le même problème et qui tombe sur cette discussion : il n'y a aucune explication dans le texte, et la suite n'est pas publique.

Merci de respecter les lecteurs du forum..

[Pierre Fauconnier]

[...]mais le but principal de mon post était d'apprendre[...]

C'est mal barré. Dans le code proposé:

• Présence de plusieurs Exit sub (ça se discute mais personne ne m'a encore prouvé que c'était indispensable, et j'ai prouvé que ça pouvait être dangereux);
• Absence de gestion d'erreurs lors de connexion à des serveurs distants;
• Absence de 'option explicit' en début de module (inacceptable, quel que soit le niveau du développeur);
• Variables non déclarées et donc non typées (inacceptable également);
• on error resume next non gérés (Que se passe-t-il lorsqu'une exception est générée);
• Late binding sur les objets "HTML", ne permettant pas la saisie semi-automatique et donc l'apprentissage;
• on error resume next dans DelMenu qui ne sert à rien;
• Mélange de code entre le traitement des données, la mise en forme;
• ...

Le code proposé, non commenté, n'est pas limité à ta demande:

• on crée un commandbar à la volée (non demandé) et on le détruit s'il existe pour pouvoir le reconstruire... ;
• on le détruit sans tester qu'il existe (avec une "gestion d'erreur" inutile, vu le code qui l'appelle, notamment);
• on met des trucs en forme en plein milieu de la récupération;
• l'architecture du code est quasi inexistante et à tout le moins très mal pensée;
• ...

Tout cela dans la même procédure, sans aucune notion de responsabilité du code (quel code fait quoi?).

[...]
Ton code est très complexe[...]

Ce code est inutilement "très" complexe parce qu'écrit avec les pieds et ne respectant pas les bonnes pratiques. Il n'y a a priori rien de complexe à parser du code html, mais faut-il encore penser et réfléchir avant de pisser du code mal foutu.



Comme le dit Arkham46, si tu demandes de l'aide en mp, tu n'auras que l'éclairage d'une seule personne. Si le code produit par cette personne est à vomir, tu apprendras à vomir.