Are you just talking about the data change or are you adding rows (selection change)?
If you are just talking about data, then you could add code to the data worksheet's SelectionChange module...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheets("Sheet2").PivotTables("PivotTable2").PivotCache.Refresh
End Sub
In my example "Sheet2" is the sheet name with the pivot table and "PivotTable2" is the pivot table name.
It is a little more complicated if you are adding rows, but basically you could add your rows and then record a macro of the pivot wizard. You will still need some coding, but I think you'll get the idea.
Bookmarks