Macro pour actualiser Plusieurs TCD

[Mister Binaire]

Bonjour le Forum,

J'ai un fichier qui contient plusieurs TCD liés à des graphes ( Voire en PJ suivi de l'Euromillions pour les collègues) .

Sur chaque graphe chaque semaine je suis obligé de faire "actualiser" pour mettre mes TCD à jour.

Je voudrais un bouton piloté par une macro du style "Actualisation Graphes" pour mettre à jour simultanément tous mes graphes.

Merci à toutes celles et tous ceux qui pourront m'aider.


Amicalement,
MB

 

[Xwprft]

Re : Macro pour actualiser Plusieurs TCD

Bonjour Mister Binaire

J'ai mis le bouton sur la feuille sur laquelle s'ouvre le fichier

A+

 

[Mister Binaire]

Re : Macro pour actualiser Plusieurs TCD

Merci de ton aide Xwprft, tu as créé exactement ce que je voulais !!!


Amicalement,
MB

 

[Modeste geedee]

Re : Macro pour actualiser Plusieurs TCD

Bonsour®

Private Sub CommandButton1_Click()
    Dim PT As PivotTable
    For Each PT In Worksheets("TCD").PivotTables
        PT.RefreshTable
    Next
End Sub