Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
PivotTable 2003 Code is not working
HI guys,
I have added code to show all items in my pivottable when a bitmap is clicked. The code needs to first show all items in the pivottable and then go back to the scorecard sheet. THe code to show all itmes does not work at all. The hyperlink works fine. I am hoping this code will solve another problem. On the scorecard, I have a button to click that filters the pivottable for a specific page item and specific row item. If they go back to the scorecard and choose another filter choice, it does not filter properly. So I thought if each time they go back to the scorecard the pivottable would show all items it would then filter correctly each time they choose a new item to filter by from the scorecard. Sub UnFILterOPDrilldown() ' ' UnFILterOPDrilldown Macro ' Macro recorded 4/6/2010 by kay Dim xx As String Application.ScreenUpdating = False 'Sheets("OP Drilldown").Select ActiveSheet.PivotTables("PivotTable1").PivotFields ("Business Unit"). _ CurrentPage = "(All)" EnableMultiplePageItems = True With ActiveSheet.PivotTables("PivotTable1").PivotFields ("Sub-Product") .AutoSort xlManual, .SourceName .PivotItems("API CO3").Visible = True .PivotItems("API Rnagel").Visible = True .PivotItems("API Renvela").Visible = True .PivotItems("FG Renagel").Visible = True .PivotItems("Renvela Sachets").Visible = True .PivotItems("FG CO3").Visible = True .AutoSort xlAscending, .SourceName End With xx = "#'Operational Scorecard'!a1" ActiveWorkbook.FollowHyperlink Address:=xx, NewWindow:=False Application.ScreenUpdating = True End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Code in 2003 not working in 2007 | Excel Programming | |||
2007 code not working in 2003 | Excel Programming | |||
Code for Inserting Sheet in Excel 2000 not working in 2003 | Excel Programming | |||
PivotTable Macro not working | Excel Programming | |||
Problem with VBA code written in Excel 2002 working in Office 2003 | Excel Programming |