Requête WEB

Bonjour à tous, en Excel 2003 et XP, ce code tourne bien :

With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.geny.com/partants-pmu/2017-06-26-saint-cloud-pmu-prix-mordant_c904229", _
Destination:=Range("a1"))
.BackgroundQuery = True
.Refresh BackgroundQuery:=False
End With

Mais avec Excel 2003 et Windows 10 erreur a la ligne suivante :

.Refresh BackgroundQuery:=False

Malgré beaucoup de recherches, je n'ai pas trouvé de solution.

J'espère que vous pourez m'aider !

Bonjour malabarbe, bonjour le forum,

Quel est le navigateur par défaut sur ton Windows 10 ?

Je testerai en changeant de navigateur par défaut ( bouton Démarrer, Paramètres, Applis, Applications par défaut, Navigateur Web).

Sur Windows 10, à part Edge, il y a Internet Exploreur 11. Tu dois le démarrer une fois pour le configurer.

Ou bien, tu peux tester avec Chrome ou FireFox ... en les mettant comme navigateur par défaut, car ta macro prend celui par défaut.

À tester ...

Joseph

Bonsoir Joseph,

Ok, je vais tester de changer le navigateur par défaut.

J'informe des résultats.

Bonsoir,

Non, le changement de navigateur n'a rien changé !

Toujours a la recherche d'une solution !

Bonjour malabarbe, bonjour le forum,

Tel quel, ton code fonctionne sur ma machine : Windows 10, FireFox et Excel 2016.

Ça fonctionne aussi sur : Windows 10, ie 11 et Excel 2007.

Joseph

Bonsoir Joseph,

je n'avais pas testé avec FireFox .

Dis-moi si tu a fait des modifications dans les paramètres Excel ?

@ +

Bonjour malabarbe, bonjour le forum,

Ouupppssss!

Comme tu n'as pas fournis le fichier, par mégarde, j'ai créé un fichier récent (* .xlsm ).

En l'enregistrant en format 97-2003 (*.xls), ça ne fonctionne plus.

Je regarde si on peut corriger.

Joseph

Ok Joseph,

Peut tu m'envoyer le fichier au format XLSM ?

Que je le teste.

Bonjour malabarbe, bonjour le forum,

... Peux tu m'envoyer le fichier au format XLSM ?

Que je le teste.

Si tu n'as que Excel 2003, je ne crois pas qu'il gérera les Xlsm .

Par contre, 1 test, 2e test, Xe test ... ton code intégral fonctionne en version 97-2003, même sur une machine où j'ai pris le temps d'installer Excel 2003.

On dirait que l'adresse Web s'est référencée dans les DNS et que l'erreur 1004 n'est plus.

En voici copie ... je vais quand même inclure la version Xlsm aussi.

Joseph