VBA Excel WEB Query

Hallo allemaal, in Excel 2003 en XP werkt deze code prima:
 
Met ActiveSheet.QueryTables.Add(Verbinding:= _
"URL; http://www.geny.com/partants-pmu/2017-06-26-saint-cloud...", _
Bestemming:=Bereik("a1" ))
. BackgroundQuery = Waar
. Achtergrondquery vernieuwen:=Onwaar
Eindigen met
 
Maar met Excel 2003 en Windows 10 fout op de volgende regel:
 
Achtergrondquery vernieuwen:=Onwaar


Ondanks veel onderzoek heb ik geen oplossing gevonden.