MAJ de tab croisé dynamique

[Daniel]

bonjour !

Voilà, j'ai sur une feuille 6 tableaux dynamiques qui ont la même source. Par contre, j'ai fait une macro (voir ci dessou) qui actualise un par un les tableaux. Le problème est que c'est long et surtout ça PLANTE! (pas de réponse)

Y a t'il une solution, comme un code VBA qui actualise la totalité des tableaux en même temps ??

Merci pour votre aide.


Voici le code que j'ai créer :

Sheets('RAPPORT').Select
Range('D14').Select
ActiveSheet.PivotTables('Tableau croisé dynamique26').PivotCache.Refresh
Range('I13').Select
ActiveSheet.PivotTables('Tableau croisé dynamique27').PivotCache.Refresh
Range('O14').Select
ActiveSheet.PivotTables('Tableau croisé dynamique28').PivotCache.Refresh
Range('U13').Select
ActiveSheet.PivotTables('Tableau croisé dynamique29').PivotCache.Refresh
Range('Z10').Select
ActiveSheet.PivotTables('Tableau croisé dynamique30').PivotCache.Refresh
Range('AE7').Select
ActiveSheet.PivotTables('Tableau croisé dynamique31').PivotCache.Refresh

 

[2passage]

Bonjour,

Voici un code qui rafraichit l'ensemble des tableaux présents sur ta feuille :

Sheets('RAPPORT').Select
For Each toto In PivotTables
toto.RefreshTable
Next

A+

 

[Sylvie]

Bonjour Daniel, 2passage, le forum,

par simple curiosité Daniel, pourquoi tu ne te sers-tu pas de la fonction 'actualiser données' qui précisemment te permet de mettre à jour tes TCD si ta base de données évolue ?


A+

 

[Daniel]

ça marche pas!

ça bloque à

For Each toto In PivotTables

 

[Jeannot45]

Bonjour,

Il faut déclarer la variable Toto comme étant une PivotTable

pour déclarer tu procèdes par

dim Toto as PivotTable


A+

Jeannot

 

[Daniel]

Merci à vous pour toutes vos réponses.

En fait je souhaite automatiser toutes les opérations. Plutôt que de cliquer sur chacun des tableaux pour les actualiser, pourquoi pas une macro qui actualise mais 6 tableaux en même temps. Mon problèmes était le suivant :
- L'automatisation par la macro marchais mais q'une seule fois! A la deuxième ça plantait!!!

J'ai donc créer une autre macro qui dans un premier temps fait le trie dans mon tableau source qui était trop important (je pense). Maintenant il n'y à plus le problème!!!

Merci à vous touspour votre aide et à bientôt!

Daniel