[VBA E] TCD changé le nom d'une colonne

Bonjour,

Je souhaiterais changer le nom d'une colonne dans un TCD, mais je n'y arrive pas, j'ai essayé en modifiant le Selection.Caption, mais je ne peux accéder à l'objet .Caption dans la Selection

Code:

---

1 2 3 4 5 6 7 8

ActiveSheet.PivotTables(NomPT).PivotSelect "'Count of Pros / (Cons)'", xlDataAndLabel, True With Selection .HorizontalAlignment = xlRight .VerticalAlignment = xlTop .ColumnWidth = 9.57 ' .Caption = "Pros/(Cons)" End With

---

J'ai donc générer grace à l'enregisteur la commande ci-dessous,

Code:

---

1 2	ActiveSheet.PivotTables(NomPT).DataPivotField. _ PivotItems("'Count of Pros / (Cons)'").Caption = "Pros /(Cons)"

---

que j'ai mis à la suite du code précédent, mais j'ai l'erreur de Run Time 1004 avec le message suivant :

Citation:

---

unable to get the PivotItems property of the pivotfield class.

---

D'avance merci de vos réponses.

bonjour

Réessaye en enlevant les quotes ' qui encadrent le nom:
(Testé avec Excel2002)

Code:

---

1 2	ActiveSheet.PivotTables(NomPT).DataPivotField. _ PivotItems("Count of Pros / (Cons)").Caption = "Pros /(Cons)"

---

michel

Merci, ca marche, mais ca ne tombait pas sous le sens.
J'ai l'impression que le nommage des champs de TCD manque un peu de cohérence.
Qu'en dis tu ?