Bonjour Titi,
Je n'ai pas rencontré de problème particulier, il faut penser à se positionner sur une cellule du TCD avant mise à jour.
Macro obtenue:
Sub Macro1()
'
Range('A7').Select
ActiveSheet.PivotTables('TCD1').RefreshTable
Range('X6').Select
ActiveSheet.PivotTables('TCD2').RefreshTable
End Sub
@+
Gael