Bonjour,

Je me casse les dents depuis 1/4h pour simplement récupérer le nom d'un tableau croisé dynamique (TCD) . Je pense que je n'utilise pas le bonnes méthodes/propriétés.

1/ je créer un TCD auquel j'y ajoute un champ en ligne "LIB"

2/ à partir de la macro VB suivante je vais pointer sur la cellule d'en-tête du champ "LIB" afin d'obtenir le nom du TCD auquel elle appartient :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
'Déclaration de ma variable texte
Dim tcd As String
 
'Idendification du nom du TCD lorsque je pointe sur la cellule d'en-tête du champ "LIB"  
 
ActiveCell.PivotTable.Name = tcd
MsgBox ("Le nom du TCD est " & tcd)
3. Rien à faire le MsgBox me renvoie du vide : 'Le nom du TCD est'

Merci pour votre aide

cdt

koobcam