VBA: Supprimer un valeur d'un PivotItems dans un TCD
1 réponse
Stach
Salut =E0 tous,
J'aimerai savoir en VBA comment supprimer la valeur d'un=20
PivotItems (champ de ligne) si celui-ci n'existe plus=20
dans les donn=E9e qui alimentent mon tableau crois=E9=20
dynamique. Je cherche qqch du style:
For Each Item In .PivotField("PRODUCTS").PivotItems =20
If Item "n'existe pas dans .PivotField
("PRODUCTS").PivotItems" then item.delete
Next
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel.M
Bonjour,
Si tu lis un tant soit peu l'anglais: http://www.contextures.com/xlPivot04.html
Salutations,
Daniel M.
"Stach" wrote in message news:b8f001c4892a$b7d55620$ Salut à tous,
J'aimerai savoir en VBA comment supprimer la valeur d'un PivotItems (champ de ligne) si celui-ci n'existe plus dans les donnée qui alimentent mon tableau croisé dynamique. Je cherche qqch du style:
For Each Item In .PivotField("PRODUCTS").PivotItems If Item "n'existe pas dans .PivotField ("PRODUCTS").PivotItems" then item.delete Next
Merci pour votre aide.
Stach ;-)
Bonjour,
Si tu lis un tant soit peu l'anglais:
http://www.contextures.com/xlPivot04.html
Salutations,
Daniel M.
"Stach" <anonymous@discussions.microsoft.com> wrote in message
news:b8f001c4892a$b7d55620$a401280a@phx.gbl...
Salut à tous,
J'aimerai savoir en VBA comment supprimer la valeur d'un
PivotItems (champ de ligne) si celui-ci n'existe plus
dans les donnée qui alimentent mon tableau croisé
dynamique. Je cherche qqch du style:
For Each Item In .PivotField("PRODUCTS").PivotItems
If Item "n'existe pas dans .PivotField
("PRODUCTS").PivotItems" then item.delete
Next
Si tu lis un tant soit peu l'anglais: http://www.contextures.com/xlPivot04.html
Salutations,
Daniel M.
"Stach" wrote in message news:b8f001c4892a$b7d55620$ Salut à tous,
J'aimerai savoir en VBA comment supprimer la valeur d'un PivotItems (champ de ligne) si celui-ci n'existe plus dans les donnée qui alimentent mon tableau croisé dynamique. Je cherche qqch du style:
For Each Item In .PivotField("PRODUCTS").PivotItems If Item "n'existe pas dans .PivotField ("PRODUCTS").PivotItems" then item.delete Next