bonsoir KN4
Supprimer les pivotItems par macro après le TCD, ne me parait pas très opportun, car tu devras être certain que seules les natures d'erreur identifiées dans tes pivotitems seront représentées, et que ces mêmes valeurs ne sont pas trop nombreuses pour t'éviter de rédiger un script à rallonge du type :
With ActiveSheet.PivotTables('LeNomDeTonTCD').PivotFields('LePivotConcerné')
.PivotItems('Erreur1ASupprimer').Visible = False
.PivotItems('Erreur2ASupprimer').Visible = False
ajouter autant de PivotItems...que nécessaire à supprimer
.................
End With
Ce qui me parait plus simple à mettre en oeuvre, si seules les données relatives aux erreurs 9006-9007-9008 t'intéressent, c'est de supprimer (par macro) dans ton fichier source avant réalisation de ton TCD, toutes les autres lignes relatives aux erreurs que tu ne souhaites pas voir représenter.
A bientôt