Hello-
I have created a pivot table. I use a macro button to update the pivot table. It is not picking up all of the row lables (current months). for some reason i can get it to do anything but add all the row lables (months) and hide the blank(s).
' MonthlyPivotTableUpdatePivot3 Macro
' Update the Monthly Summary Pivot Table
' unlock sheets to update table
Sheets("Monthly Summary").Select
ActiveSheet.Unprotect Password:="4321"
' screen updateing
Application.ScreenUpdating = False
' show all months on the pivot table
Sheets("Monthly Summary").Select
ActiveSheet.PivotTables("PivotTable3").PivotCache.Refresh
With ActiveSheet.PivotTables("PivotTable3").PivotFields("Month/ year")
' remove pivot table blanks
With ActiveSheet.PivotTables("PivotTable3").PivotFields("Month/ year")
.PivotItems("").Visible = False
.PivotItems("(blank)").Visible = False
I have created a pivot table. I use a macro button to update the pivot table. It is not picking up all of the row lables (current months). for some reason i can get it to do anything but add all the row lables (months) and hide the blank(s).
' MonthlyPivotTableUpdatePivot3 Macro
' Update the Monthly Summary Pivot Table
' unlock sheets to update table
Sheets("Monthly Summary").Select
ActiveSheet.Unprotect Password:="4321"
' screen updateing
Application.ScreenUpdating = False
' show all months on the pivot table
Sheets("Monthly Summary").Select
ActiveSheet.PivotTables("PivotTable3").PivotCache.Refresh
With ActiveSheet.PivotTables("PivotTable3").PivotFields("Month/ year")
' remove pivot table blanks
With ActiveSheet.PivotTables("PivotTable3").PivotFields("Month/ year")
.PivotItems("").Visible = False
.PivotItems("(blank)").Visible = False