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 : Sélectionner tout - Visualiser dans une fenêtre à part
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 : Sélectionner tout - Visualiser dans une fenêtre à part
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 :
unable to get the PivotItems property of the pivotfield class.

D'avance merci de vos réponses.