Masquer des items pour une variable d'un tableau croisé dynamique en VBA

[Pietro_L]

Bonjour le forum,

Je viens de voir sur le formum un problème similaire mais pas de solution pour le moment, donc je vous expose mon pb.

Je cherche à masquer une partie des items d’une colonne du tableau croisé dynamique en VBA.
Pour cela, j’avais pensé dans un premier temps masquer tous les items puis afficher ceux qui m’intéressent, comme dans l’exemple ci-dessous.

With ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields( _
        "Qualification")
        .PivotItems("3-cadre").Visible = True
        .PivotItems("4-cadre supérieur").Visible = True
    End With

Il faut donc tout d’abord que je puisse faire la liste des items présents que je stockerai dans un tableau par exemple, et là je ne vois pas comment faire si qqn à une idée je suis preneur.

J’ai mis en pièce jointe un exemple, au cas ou je n’ai pas été clair.
Dans l’exemple, je souhaiterai ne faire afficher que les items 1-agent et 2-maitrise pour la variable Qualification.


Merci d’avance pour vos réponses.

 

[PascalXLD]

Re : Masquer des items pour une variable d'un tableau croisé dynamique en VBA

Bonjour

Merci de mettre des pièces jointes avec des noms et des données fictifs.

Merci Hervé

 

[Pietro_L]

Re : Masquer des items pour une variable d'un tableau croisé dynamique en VBA

J'ai trouvé avec :

toto = ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("Qualification").PivotItems.Count


Puis pour les noms : name

 

[Pietro_L]

Re : Masquer des items pour une variable d'un tableau croisé dynamique en VBA

Juste pour info le ficheir était un exemple trouvé sur internet, il n'y avait pas de données sensibles