Bonjour,

J'essaies de faire un test sur les Pivotitems d'un TCD, mais j'ai une erreur:
Impossible de lire la propriete PivotItems de la classe PivotField.
avec le code suivant:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
If ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields("Fournisseur").PivotItems("Conforama").Visible = True Or _
          ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields("Fournisseur").PivotItems("DFI").Visible = True Or _
          ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields("Fournisseur").PivotItems("Founisseur").Visible = True Or _
          ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields("Fournisseur").PivotItems("Foussier").Visible = True Or _
          ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields("Fournisseur").PivotItems("TENTE").Visible = True Then
Si quelqu'un a une idée car je bute sur le problème sans trouver de solution.

Merci d'avance