PivotTables et assigner une valeur un filtre

[La braise]

Bonjour à tous,

Une petite question sur l'exploitation des Pivot tables en Vba.

Je sais assigner une variable à une valeur à un PivotField via :

ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("CG4"). _
CurrentPage = fieldCG4

Je souhaite affecter une variable à une étiquette de ligne. (les champs mis en lignes)

L'enregistreur de macro me l'identifie comme un PivotField mais la même syntaxe qui fonctionne pour une étiquette d'en-tête ne fonctionne pas pour une étiquette de ligne.

L'enregistreur me donne :

With ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("Réseau")
.PivotItems("CHASSIS").Visible = False
.PivotItems("ENGINE PARTS").Visible = False
End With

Il semble que l'on soit obligé de déclarer ce que l'on souhaite masquer et non pas ce que l'on souhaite afficher....😕

Existe t-il une syntaxe qui permette :
- de les mettre tous les .PivotItems en .visible = false sauf évidement celui que je souhaite afficher😀😀😀


D'avance merci pour votre aide toujours aussi efficace.

😀

 

[La braise]

Re : PivotTables et assigner une valeur un filtre

Personne n'a une idée... même un début... 😕

😀😀😀

 

[La braise]

Re : PivotTables et assigner une valeur un filtre

SOS...
je suis sur que c'est possible...

D'avance merci.😀

 

[La braise]

Re : PivotTables et assigner une valeur un filtre

Bonjour à Tous,

Je retente ma chance...

Si quelqu'un à le début d'un commencement d'idée..

D'avance merci pour votre aide.

😀

 

[La braise]

Re : PivotTables et assigner une valeur un filtre

😕😕😕