tsitsicat1
New Member
- Joined
- Jun 27, 2018
- Messages
- 10
Hello everyone.
I use the code below to change the month of a pivot table
Sub Update_month()
'
' Update_month Macro
'
'
Dim ws As Integer
Dim wb As Workbook
ActiveSheet.PivotTables("PivotTable1").PivotFields("[Date].[Calendar].[Month]") _
.VisibleItemsList = Array("[Date].[Calendar].[Month].&[2018]&[8]")
How can i use the code in order to update the month in all pivots in one sheet?
I use the code below to change the month of a pivot table
Sub Update_month()
'
' Update_month Macro
'
'
Dim ws As Integer
Dim wb As Workbook
ActiveSheet.PivotTables("PivotTable1").PivotFields("[Date].[Calendar].[Month]") _
.VisibleItemsList = Array("[Date].[Calendar].[Month].&[2018]&[8]")
How can i use the code in order to update the month in all pivots in one sheet?