Bonjour,

J'ai un tableau croisé dynamique issu d'une requête vers une source de données externe, j'aimerais récupérer la date de dernière actualisation de cette requête dans une cellule.

A l'aide de cette doc : https://docs.microsoft.com/fr-fr/off...le.refreshdate j'ai créé cette Sub dans la feuille ou se situe le TCD :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub RecupDateActua(ByVal Target As PivotTable)
 
    Set pvtTable = Worksheets("Données Brutes").PivotTable("Rondes__2")
    dateString = Format(pvtTable.RefreshDate, "Long Date")
    Range("M1") = dateString
 
End Sub
Il ne se passe pourtant rien alors que la date devrait se copier dans la cellule M1 de cette même feuille, alors ma question est que manque-t-il à mon code ? Que dois-je corriger ?

Merci pour votre aide.