Discussion :

[sash6]

Bonjour tout le monde,

Voici un bout de code sur les TCD que j'ai trouvé http://www.developpez.net/forums/sho...E9s+dynamiques. Il est nickel, il marche comme il faut, sauf que lorsque je le modifie un peu:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
With Feuil2.PivotTables("TCD Montant/Type/Pole")
    .AddFields RowFields:="POLE"
    .PivotFields("MONTANT FACTURE S1,2006 (hors TVA) en €").Orientation = xlDataField
    .AddFields ColumnFields:="Type : MOE/MOA/Opérations"
End With

mon TCD sort sans les RowFields. Un problème de synthaxe?

[sash6]

'scusez moi . C'est bon j'ai trouvé!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
With Feuil2.PivotTables("TCD Montant/Type/Pole")
    .AddFields RowFields:="POLE"
    .PivotFields("MONTANT FACTURE S1,2006 (hors TVA) en €").Orientation = xlDataField
    .PivotFields("Type : MOE/MOA/Opérations").Orientation = xlColumnField
End With