En faite j'ai encore quelques petit questions
Pour faire les valeurs de mon TCD je procede ainsi pour mon code VB:
With ActiveSheet.PivotTables("TCD_1").PivotFields( _
" Libellé Produit") <-Correspond à ma colonne
.Caption = "Nombre de Libellé Produit" <-Correspond au nom dans mon TCD
.Orientation = xlColumnField <-précise que c'est une valeur et donc le met en colonne
.Function = xlCount <-Va realiser un nombre
.Position = 1 <-????? je sais pas ????
End With
Ma macro ne fonctionne pas sur la function pourquoi?
Cordialement
Bonne soirée!
Alex
Ps: le message d'erreur est le suivant:
Erreur d'execution '1004'
Impossible de définir la propriété Function de classe PivotField