Select items in Page fields in Pivot table using VBA

ericj

New Member
Joined
Mar 16, 2011
Messages
5
Hello
Using Excel 2010


I have these two pieces of code below that put 2 fields into the page area of a pivot table.
I want to choose 2 out of 40 items in OrderID
I want to choose 1 out of 20 items in CustomerID

Is this possible without having to write true vs false code for each item in VBA?

Any alternative detailed VBA code greatly appreciated.

'Insert Page Fields
With ActiveSheet.PivotTables("SalesPivotTable").PivotFields("OrderID")
.Orientation = xlPageField
.Position = 1
End With


With ActiveSheet.PivotTables("SalesPivotTable").PivotFields("CustomerID")
.Orientation = xlPageField
.Position = 2
End With

Thank you
Eric
 

Some videos you may like

Excel Facts

What is the fastest way to copy a formula?
If A2:A50000 contain data. Enter a formula in B2. Select B2. Double-click the Fill Handle and Excel will shoot the formula down to B50000.

Watch MrExcel Video

Forum statistics

Threads
1,096,305
Messages
5,449,570
Members
405,572
Latest member
Oberon

This Week's Hot Topics

Top