VBA Excel Requète WEB

VBA Excel Requète WEB - VB/VBA/VBS - Programmation

Marsh Posté le 30-06-2017 à 15:09:16    

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 !

Reply

Marsh Posté le 30-06-2017 à 15:09:16   

Reply

Marsh Posté le 07-07-2017 à 22:43:03    

Je viens de tester ton code, RAS sur office 2016 et Win 10
 
Ca m'a bien retourné tout un tas de truc (sur des courses chevaux je pense):
 
N° Cheval C SA Poids Déch. Jockey Entraîneur Musique Valeur Cotes références Dernières cotes
 
Donc ca marche...
 
C'est quoi l'erreur que tu as?


Message édité par wago le 07-07-2017 à 22:43:47
Reply

Marsh Posté le 08-07-2017 à 10:48:22    

Bonjour wago,
 
Ok pour tes tests positifs.
 
Mon erreur : c'est que je n'ai pas Excel 2016 mais Excel 2003
et la le programme se bloque sur : Refresh BackgroundQuery:=False  
 
J'ai fouillé partout, mais rien trouvé !
 
Bonne journée

Reply

Marsh Posté le 08-07-2017 à 21:56:35    

tu as essayé de faire une reparation d'office ou de le reinstaller completement.
 
tu as la possibilité de tester sur un autre pc avec la meme config que toi?
 
tu es sur que office 2003 est bien compatible avec w10?
 
parce que si ca fonctionne bien sur un autre pc c'est surement pas ton code le pb


Message édité par wago le 08-07-2017 à 21:56:56
Reply

Marsh Posté le 09-07-2017 à 11:46:41    

Oui, il semblerai qu'il y ai une incompatibilité entre
Windows 7/10 et Excel 2003.
 
Même Microsoft ne semble pas avoir de solutions !
 
Testé sur 5 PC, toujours la même erreur.
 
J'ai même tenté de remplacer des DLL d'Excel 2003
par des DLL d'Excel 2016, mais rien n'y fait.
 
Donc, toujours à la recherche d'une solution.
 
Je bénie par avance la personne qui règlera mon problème.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed