bonjour a tous,

j'ai créé un fichier excel me permettant d'effectuer mes comptes . Dans ce fichier j'y intégre régulièrement de nouvelles feuilles ("Janvier 2008", "Février 2008"...) puis je fais un TCD pour chaque mois.
Ci-dessous le TCD du mois de Janvier 2008.
Jusque là pas de problème. Par contre, je rencontre des difficultés pour créer un TCD qui tienne compte toutes les données de toutes les feuilles.
J'espère avoir été assez claire dans mes explications, peut être avez une solution à me donner?
A l'avance merci

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Sheets("Janvier 2008").Range("A7").CurrentRegion.Select
vTableau = "Janvier 2008!" + Selection.Address(ReferenceStyle:=xlR1C1)
Sheets("Janvier 2008").Range("a1").Select
MsgBox vTableau
ActiveSheet.PivotTables("Tableau croisé dynamique1").SourceData = vTableau
ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotCache.Refresh