Tableau Croisé dynamique

[AnneSophie]

Bonjour,

Sur une feuille de calcul excel je dispose de plusieurs tableaux croisé dynamique, avec tous en nom de page une date (toute identique sur chaque tableau). Est-il possible de mettre cette date en automatique?

Merci

AnneSophie

 

[Pierrot93]

Re : Tableau Croisé dynamique

Bonjour AnneSophie,

regarde le code ci-dessous, pour tous les tcd de la feuille active, le nom du champ de page est "date" :

Dim pt As PivotTable
For Each pt In ActiveSheet.PivotTables
    pt.PageFields("dates").CurrentPage = "14/01/2010"
Next pt

bonne journée
@+