Macro to Refresh a Pivot Table existed at a Dynamic Active Cell
'A Simple macro to refresh a Pivot Table whose name not know in advance , by Dynamically based on Active Cell
Sub Pvt_Refresh()
ActiveSheet.Range("I4").Select
Pivot_Name = Selection.PivotTable.Name
ActiveSheet.PivotTables(Pivot_Name).PivotCache.Refresh
'ActiveWorkbook.RefreshAll [ To Refresh all Pivots Data in a WorkBook ]
End Sub
Thanks.,TAMATAM
'A Simple macro to refresh a Pivot Table whose name not know in advance , by Dynamically based on Active Cell
Sub Pvt_Refresh()
ActiveSheet.Range("I4").Select
Pivot_Name = Selection.PivotTable.Name
ActiveSheet.PivotTables(Pivot_Name).PivotCache.Refresh
'ActiveWorkbook.RefreshAll [ To Refresh all Pivots Data in a WorkBook ]
End Sub
Thanks.,TAMATAM
No comments:
Post a Comment
Hi User, Thank You for visiting My Blog. If you wish, please share your genuine Feedback or comments only related to this Blog Posts. It is my humble request that, please do not post any Spam comments or Advertising kind of comments, which will be Ignored.