Pivotitem delete

Bonjour à toutes et à tous,

En parcourant les propriétés et méthodes des tableaux croisés dynamiques, je
suis tombé sur la méthode "Delete" de l'objet PivotItem.
Mais je n'arrive pas bien à saisir à quoi sert cette méthode et comment
l'impémenter dans VBA.
Cette méthode servirait-elle éventuellement à effacer un élément du tableau
croisé dynamique?
J'ai essayà ceci:
sub test()
Set pvtTable = Worksheets("Sit_Grpes").Range("A1").PivotTable
pvtTable.PivotFields("Date").PivotItem("05-04-2005").Delete
end sub

Excel me revoie le message suivant:
Erreur d'exécution 438
Propriété ou méthode non géré par cet objet

J'ai pourtant un tableau croisé dynamique avec un champ "Date" qui contient
un élément "05-04-2005".

Merci d'avance de vos remarques,

Salutations,

Nico Iannizzi

bonjour Nico,

je crois que l'on peut utiliser cette méthode seulement si la donnée est absente du fichier source,

voie sur ce lien.

http://groups.google.com/groups?hl=fr&lr=&threadm=exTnMdybEHA.1004%40TK2MSFTNGP11.phx.gbl&rnum=1&prev=/groups%3Fq%3DPivotItem%2Bdelete%2Bgroup:microsoft.public.fr.excel%2Bauthor:AV%26hl%3Dfr%26lr%3D%26scoring%3Dd%26selm%3DexTnMdybEHA.1004%2540TK2MSFTNGP11.phx.gbl%26rnum%3D1

isabelle

Bonjour à toutes et à tous,

En parcourant les propriétés et méthodes des tableaux croisés dynamiques, je
suis tombé sur la méthode "Delete" de l'objet PivotItem.
Mais je n'arrive pas bien à saisir à quoi sert cette méthode et comment
l'impémenter dans VBA.
Cette méthode servirait-elle éventuellement à effacer un élément du tableau
croisé dynamique?
J'ai essayà ceci:
sub test()
Set pvtTable = Worksheets("Sit_Grpes").Range("A1").PivotTable
pvtTable.PivotFields("Date").PivotItem("05-04-2005").Delete
end sub

Excel me revoie le message suivant:
Erreur d'exécution 438
Propriété ou méthode non géré par cet objet

J'ai pourtant un tableau croisé dynamique avec un champ "Date" qui contient
un élément "05-04-2005".

Merci d'avance de vos remarques,

Salutations,

Nico Iannizzi