prks21
02-05-2015, 12:18 AM
Hey Guys,
I've been trying to solve this for most of the day and is really annoying. Please help!
I've been writing a macro to select an additional date in a date filter of a pivot table. I recorded the macro, as such:
Sub Macro4()
'
' Macro4 Macro
'
'
ActiveSheet.PivotTables("PivotTable2").PivotFields("Order_Date").CurrentPage = _
"(All)"
With ActiveSheet.PivotTables("PivotTable2").PivotFields("Order_Date")
.PivotItems("5/02/2015").Visible = True
End With
End Sub
However, even when I try running that code I get an error. how is that even possible? Recorded macro not performing what it did....
Any help would be much appreciated. Thanks!
I've been trying to solve this for most of the day and is really annoying. Please help!
I've been writing a macro to select an additional date in a date filter of a pivot table. I recorded the macro, as such:
Sub Macro4()
'
' Macro4 Macro
'
'
ActiveSheet.PivotTables("PivotTable2").PivotFields("Order_Date").CurrentPage = _
"(All)"
With ActiveSheet.PivotTables("PivotTable2").PivotFields("Order_Date")
.PivotItems("5/02/2015").Visible = True
End With
End Sub
However, even when I try running that code I get an error. how is that even possible? Recorded macro not performing what it did....
Any help would be much appreciated. Thanks!