Zapytanie VBA Excel WEB

Witam wszystkich, w programach Excel 2003 i XP ten kod działa poprawnie:
 
Za pomocą ActiveSheet.QueryTables.Add(Connection:= _
"Adres URL; http://www.geny.com/partants-pmu/2017-06-26-saint-cloud...", _
Miejsce docelowe:=Zakres("a1" ))
. BackgroundQuery = Prawda
. Odśwież BackgroundQuery:=Fałsz
Zakończ się na
 
Ale z programem Excel 2003 i błędem systemu Windows 10 w następującym wierszu:
 
Odśwież BackgroundQuery:=Fałsz


Pomimo wielu badań nie znalazłem rozwiązania.