Nom d'un TCD

Bonjour,

Je n'arrive pas à récupérer le nom d'un TCD en VBA. J'arrive bien à récupérer l'index d'un TCD, et à énumerer mes TCD, mais impossible d'extraire de l'objet TCD son nom. En tout cas j'ai pas trouvé.
Merci d'avance de vos idées.

Cordialement

Bonjour,

un essai

Code:

---

1 2 3 4

Dim pt As PivotTable For Each pt In ActiveSheet.PivotTables MsgBox pt.Name Next pt

---