VBA Macro gegevens vernieuwen

[soalni]

Hallo,

Ik heb een bestand met meerdere koppelingen via MS Query. Ik gebruik formules om te rekenen met de gegevens die worden opgehaald en daarna nog eens draaitabellen.

Al met al moeten de gegevens 3 keer worden vernieuwd om de juiste data te gebruiken en dat wil ik via een macro doen.

Maar dat lukt dus niet. Als ik het in de macro verwerk, vernieuwt hij gewoon maar 1 keer.

zie bijgaand de macro in VBA.

Wie kan mij helpen?

 

[tkint]

Beste,

Macro 2 doet net hetzelfde als macro1. En is het comando,refresch de juiste methode? Moeilijk te achterhalen zonder voorbeeldbestand.

 

[soalni]

Ja klopt, want ze moeten ook hetzelfde doen.

De gegevens moeten twee keer worden vernieuwd. (Een keer de verbindingen (MS Query) en daarna de draaitabellen).

Alleen nu doet ie het maar 1 keer.

 

[tkint]

Beste,

Hoe weet vba dat de ene keer de query moet vernieuwd worden en de andere keer de draaitabellen?

 

[soalni]

uh.. ik heb geen idee..

Er staat refresh all.. dus ik denk dan hij doet alles 2 keer vernieuwen..

Hoe zou ik dat anders kunnen doen dan?

 

[tkint]

Beste,

Ik zou toch eens op het internet opzoeken hoe je de query en de draaitabellen moet updaten.

 

[edmoor]

Zo bijvoorbeeld:
ActiveSheet.PivotTables("DRAAITABELNAAM").RefreshTable

 

[HSV]

Of probeer eens:

ThisWorkbook.RefreshAll

Deze methode vernieuwt alle externe gegevensbereiken en draaitabelrapporten in de opgegeven werkmap.
Objecten waarvan de eigenschap BackgroundQuery is ingesteld op True, worden op de achtergrond vernieuwd.