Actualiser une page web sur excel

bonjour,
tu ne nous donnes aucune information précise, ni ton code, ni ton fichier, ni description de comment se fait l'importation.

comme tu ne nous donnes pas le contexte, je suppose que c'est un nouveau code qui n'a jamais fonctionné. est-ce exact?

salut yg-be... merci pour ton intérêt à la question.

Dans excel, à partir du chapitre "DONNEES" puis "A PARTIR DU SITE WEB", après avoir indiqué l'url de la page web cherché, il suffit de sélectionner la page entière comme demandé par excel puis de cliquer sur le bouton "importer"
Il s'agit d'une procédure proposée par excel et non pas d'une programmation.

Je l'utilisais une dizaine d'année auparavant

https://info.pmu.fr/programme/courses/R1/C1

ou

https://www.zeturf.fr/fr/course/2020-09-05/R1C1-vincennes-prix-emile-wendling/turf

voici le texte qui apparait au lieu de la page avec la course

Voir la version mobile
Skip to main content
Où parier ?
PMU entreprise
Entraide
Home
Programme et résultats
Promotions
MyPMU
Comment parier ?
Programme et résultats
Pronostic du Quinté+ du jour
Actualités
Live et Replay
Calendrier
Blog Hippique
Journal de la course
Actualités sur les courses
Pronostic du Quinté+ du jour
Calendrier des reunions
Mon compte
Ouvrir un compte Carte PMU
Découvrir la Carte PMU
Aide sur le compte PMU
Les points de vente PMU
Rechercher un point de vente
Comment parier en point de vente ?
Application mobile My PMU
Entreprise
Qui sommes-nous ?
Ressources Humaines
Espace Presse
Entreprise
Carrières
Infos légales
Aide
Contact
Ouvrir un compte
Nouveau Quinté+
Blog hippique
Pronostic Foot
Home
Javascript désactivé
Le site pmu.fr nécessite l'activation de javascript dans votre navigateur.

Bonjour,

Je me suis servi de l'enregistreur de macro , tu n'as qu'a essayer ce code:

Option Explicit
Sub Macro1()
    With ActiveSheet.QueryTables.Add(Connection:= _
        "URL;https://www.zeturf.fr/fr/course/2020-09-05/R1C1-vincennes-prix-emile-wendling/turf" _
        , Destination:=Range("$A$1"))
        .Name = "turf"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .WebSelectionType = xlEntirePage
        .WebFormatting = xlWebFormattingNone
        .WebPreFormattedTextToColumns = True
        .WebConsecutiveDelimitersAsOne = True
        .WebSingleBlockTextImport = False
        .WebDisableDateRecognition = False
        .WebDisableRedirections = False
        .Refresh BackgroundQuery:=False
    End With
    ActiveWindow.SmallScroll Down:=9
End Sub

Bonjour cs_Lepivert...
Bien essayé ce code pour Zeturf, cependant les cotes (dernières colonnes) n'apparaissent pas. J'ai le même résultat en suivant la procédure d'excel (chapitre "DONNEES" puis "A PARTIR DU SITE WEB")
Pour le PMU ça ne marche pas, toujours le même texte indiqué ci-dessus.

Peut-être une "activation" dans mon paramétrage qui manque, je ne sais pas !!?

En tout cas sympa ton temps passé à m'aider.

J'ai surtout besoin du PMU

Bonne journée