Pivot Table Refresh

[howard]

I would like to know how to set the Pivot table so that it refreshes automatically each time data updated

I am using Excel 2007

Your assistance will be most appreciated

 

[Robert Mika]

Try this:

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.PivotTables("PivotTable1").RefreshTable
End Sub

 

[howard]

Hi Robert

Thanks for the help. I right clicked on the pivot table sheet and pasted the code under "view code"

For some unknown reason when changing the raw data, the pivot table data does not change

It would be appreciated if you would check & advise

 

[Robert Mika]

Hi howard,
I found this olution here, there is guidance how to implemment it.

http://www.excelforum.com/excel-programming/581663-refresh-pivot-table-when-data-changes.html

 

[howard]

Hi Robert

Thanks for pointing me in the right direction. This is much appreciated

My Pivot Table is in a seperate worksheet and the code below works perfectly

Private Sub Worksheet_Activate()
ActiveSheet.PivotTables("PivotTable1").RefreshTable
End Sub

 

[uson]

Robert,

I'm looking for code to put in a workbook that has 6 pivot tables (report.xlsm) that is linked to a separate workbook with the data (source.xlsm). I have tried using Refresh feature in report.xlsm but it does not reflect changes from the data source.xlsm. Any suggestions?

 

[Robert Mika]

Sorry I'm not that good with VBA.
Repost your request with different topic title.