Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2019 actualiser plusieurs TCD quand clic sur feuille

saimone

XLDnaute Nouveau
Bonjour, j'ai dans mon classeur plusieurs feuilles excel.

Certaines d'entre elles contiennent des TCD.
feuil1 contient TCD1; TCD2; TCD3
feuil2 contient TCD4; TCD12; TCD13

Une autre feuille contient des graphiques basés sur ces TCD, elle s'appelle graph.

J'aimerais, lorsque je clique sur la feuille "graph", que touts mes TCDS s'actualisent.

L'enregistreur de macro me donne:

1 - pour le clic sur la feuille:
Sub clicgraph()
Sheets("graph").Select
End Sub

2 - pour l'actualisation des TCDS:
Sub acttttcd()
ActiveSheet.PivotTables("Tableau croisé dynamique12").PivotSelect "client[All]" _
, xlLabelOnly + xlFirstRow, True
ActiveWorkbook.RefreshAll
End Sub

Je pense que le code pour l'actualisation est bon.
Par contre le déclencheur de l'évènement n'est pas bon.

Pouvez vous m'aider à trouver une solution pour cela?
 

chris

XLDnaute Barbatruc
Bonjour

attention si tous les TCD sont basés sur la la même source, l’actualisation d'un seul actualise tout

Donc éviter les actualisations inutiles en raisonnant par source

Par ailleurs ActiveWorkbook.RefreshAll ou mieux
ThisWorkbook.RefreshAll
suffit entre Sub et end Sub
pas besoin de tout le reste...
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…