Bonjour,

Pour certains collègue, un tableau même avec MFC ce n'est pas parlant, il préfère avoir un mail avec seulement certaine valeur.
J'aimerais donc dans un premier temps réussir à lister tout les sous-totaux pour un champ particulier.
Je sais via get data récupérer une valeur particulière mais dès que j'essaye de boucler j'ai une erreur 1004 élément introuvable (sur la ligne du getdata).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub tcdphrase()
Dim pvti As PivotItem, pvt As PivotTable, totpvtin As String
For Each pvt In Sheets("Tableau").PivotTables
    For Each pvti In pvt.PivotFields("CORBEILLE").PivotItems
        Debug.Print pvti.Name & " : "
        Debug.Print pvt.GetData("'% clôturées  -48h' 'CORBEILLE' pvti.name")
    Next
Next
End Sub
Merci d'avance

edit: Résolu
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub tcdphrase()
Dim pvti As PivotItem, pvt As PivotTable, totpvtin As String
For Each pvt In Sheets("Tableau").PivotTables
    For Each pvti In pvt.PivotFields("CORBEILLE").PivotItems
        Debug.Print pvti.Name & " : "
        Debug.Print pvt.GetData("'% clôturées  -48h' 'CORBEILLE' " & pvti.name)
    Next
Next
End Sub