Bonjour à tous,

J'ai le souci suivant: mon code manipule des TCD mais il arrive que ces derniers ne contiennent pas tous les champs listés. Du coup le code plante. Est-ce qu'il y a une syntaxe pour y remédier? Pour illustration:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
With ActiveSheet.PivotTables("MonTCD").PivotFields( _
        "Pole")
        .PivotItems("A").Visible = True
        .PivotItems("B").Visible = False
        .PivotItems("C").Visible = False
Ici la non existence du champ "B" provoque l'erreur. J'avoue que j'ai tenté de mettre en place une solution trouvée sur le tuto de silky...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
ActiveSheet.PivotTables("MonTCD").PivotCache.MissingItemsLimit = xlMissingItemsNone
...mais soit j'ai mal compris l'objet du code, soit ça marche pôoo