Bonjour,
Un début de réponse en VBA.
Copie cette procédure dans le module de la feuille qui comporte le TCD.
A l'activation de la feuille TCD, celui-ci sera actualisé.
Dans la négative, joins un fichier...
Cdlt.
Option Explicit
Private Sub Worksheet_Activate()
With Me
.Unprotect Password:="xxx"
.PivotTables(1).RefreshTable
.Protect Password:="xxx", _
AllowUsingPivotTables:=True
End With
End Sub