Bonjour,
Je vous mets le fichier en pj pour plus de clarté.
ça se passe dans l'onglet "facture".
Mon but est de changer la source des données du TCD selon le contenu de la cellule D4. (sachant que ce contenu correspond à différents nom de tableaux pré-programmés).
Je débute sur VBA et je bute sur cette partie.
Vous pouvez voir ma tentative dans la macro1 qui n'est pas très brillante:
Si quelqu'un aurait un petit conseil à me donner...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Sub Macro1() ' ' Macro1 Macro ' changer la source de donnees de mon tcd ' ' ActiveSheet.PivotTables("Tableau croisé dynamique1").ChangePivotCache _ ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:="CELL("contenu",R4C4)" , Version:=6) End Sub
Merci d'avance
Partager