Programma afloop laten pauzeren

[hanskraan]

Ik heb een macro gemaakt in Excel 2007 om met behulp van VB een tabel van internet in mijn Excelblad te plaatsen. Als ik echter het VB programma laat starten dan wordt de pagina van die site welke kort vooraf gaat aan de gewenste tabel in het Excelblad getoond. Ik zoek daarom de code om het VB programma 1 a 2 sec (of misschien nog langer) te laten pauzeren zodat die zg "voorloper" verdwenen is en de gegevens van van de gewenste tabel dan in het spreadsheet worden gezet. Kan iemand mij de code geven welke ik dan in het VB programma kan opnemen na de regel:
Add (Connection:="URL;http://www.naam van de site.asp", Destination:=Range("$A$1"))

 

[vanschagen]

is jaren geleden hoor dat ik wat in vb deed, maar misschien dit???

private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (byval dwMilliseconds as Long)

private sub Form_Load
Sleep(1000)
end sub

 

[edmoor]

Deze wacht 5 seconden:
application.wait (now()+timevalue("00:00:5"))

 

[hanskraan]

Ik heb de coderegel van Edmoor geimplementeerd. Het programma pauzeert inderdaad met die code, waarvoor mijn dank. Helaas is het probleem niet opgelost. Daarom omschrijf ik hier iets meer gedetaileerd het probleem en mijn doelstelling.

Ik wil met behulp van een macro automatisch de AEX koersen van de site: http://www.abnamro.nl/nl/beleggen/koersinformatie/aandelen_opties.html
in een Excel sheet zetten, zodat ik hiermee berekeningen kan maken. Echter zowel handmatig invoer met "Gegevens" ->"Externegegevens ophalen" -> "Van Web" als met de macro wordt telkens alleen de header van de tabel weergegeven. Deze verschijnt soms ook kort als je de site opent in de browser maar wordt onmiddellijk overschreven met de koersen en verdere informatie op die pagina. Dus wat verschijnt in het Excel blad is slechts:

Naam Huidig +/- % Tijd Slot Volume
Huidig +/- % Informatie Opties Order plaatsen

De koersen verschijnen niet in het Excelblad. Weet iemand hoe je dit kan oplossen?
Ik werk met Excel 2007

 

[hanskraan]

Het probleem met het correct en volledig binnen halen van de AEX koersen is nog steeds niet opgelost. Zie voor details mijn laatste omschrijving van het probleen. Het pauzeren van het programma leidde niet tot de oplossing van het probleem. Wie kan mij een advies geven hoe de volledige koersen van de genoemde site kunnen worden gezet in Excel?

 

[alphamax]

andere site zoeken
er zijn veel meer sites met beurskoersen
google "beurskoersen aex" en vind o.a. http://www.eurobench.com/koersen/ (eenvoudig met een webquery te importeren)

 

[hanskraan]

OK zal ik overnemen. Bedankt voor deze tip Alphamax