Si vous avez plus d’un tableau croisé dynamique dans le classeur, vous pouvez utiliser ce code pour actualiser tous ces tableaux croisés dynamiques à la fois.
‘Ce code actualisera tous les tableaux croisés dynamiques du classeur
Sub ActualiserTCD( ) Dim pt As PivotTable For Each pt In ActiveWorkbook.PivotTables pt.RefreshTable Next pt End Sub