Say range "B8" of pivot table 1 is 60, I want the range "x2" of pivot table 7 also to pick 60 and then refersh it. Below is the coding which I have done, can anyone help?
Expand|Select|Wrap|Line Numbers
- Range("B8").Select
- ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
- Range("B31").Select
- ActiveSheet.PivotTables("PivotTable2").PivotCache.Refresh
- Range("B54").Select
- ActiveSheet.PivotTables("PivotTable3").PivotCache.Refresh
- Range("B77").Select
- ActiveSheet.PivotTables("PivotTable4").PivotCache.Refresh
- Range("B100").Select
- ActiveSheet.PivotTables("PivotTable5").PivotCache.Refresh
- Range("B129").Select
- ActiveSheet.PivotTables("PivotTable6").PivotCache.Refresh
- Range("X2").Select
- ActiveSheet.PivotTables("PivotTable7").PivotCache.Refresh
- Range("X24").Select
- ActiveSheet.PivotTables("PivotTable8").PivotCache.Refresh
- Range("X49").Select
- ActiveSheet.PivotTables("PivotTable9").PivotCache.Refresh
- Range("X76").Select
- ActiveSheet.PivotTables("PivotTable10").PivotCache.Refresh
- Range("X101").Select
- ActiveSheet.PivotTables("PivotTable11").PivotCache.Refresh
- Range("AM5").Select
- ActiveSheet.PivotTables("PivotTable12").PivotCache.Refresh
- Range("AM29").Select
- ActiveSheet.PivotTables("PivotTable13").PivotCache.Refresh
- Range("AM59").Select
- ActiveSheet.PivotTables("PivotTable14").PivotCache.Refresh
- Range("AM89").Select
- ActiveSheet.PivotTables("PivotTable15").PivotCache.Refresh
- Range("AM115").Select
- ActiveSheet.PivotTables("PivotTable16").PivotCache.Refresh
- MsgBox ("Please proceed to updating the layout rotation")
- End Sub