Tableaux croisés dynamiques

Bonjour,

La mise à jour en temps réel n'est possible qu'en plaçant une instruction en VBA.

Essaie en plaçant cette instruction en VBA dans la feuille "thisworkbook".

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
pvtTable.RefreshTable
End Sub

Avec sheet 1 = le nom de la feuille contenant le TCD
Avec Range 3 = la prmeière cellule du TCD en haut à gauche.

Bon travail

@+ Dan