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:
Si quelqu'un a une idée car je bute sur le problème sans trouver de solution.
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
Merci d'avance
Partager