Assign a value to the Orientation property of the PivotField object, as shown here: : PivotTable « Excel « VBA / Excel / Access / Word






Assign a value to the Orientation property of the PivotField object, as shown here:

 
     Sub AddFieldsToTable()
         With ActiveSheet.PivotTables(1)
             .AddFields RowFields:="State", AddToTable:=True
             .PivotFields("Date").Orientation = xlPageField
         End With
     End Sub

 








Related examples in the same category

1.Create Pivot Table From database
2.Modifying Pivot Tables
3.Creating a PivotTable Report
4.PivotTables Collection
5.Redefines the layout of the fields in the existing Table, apart from the data field
6.Add data field to PivotTable
7.Visible Property
8.add calculated items to a field using the Add method of the CalculatedItems collection
9.remove the CalculatedItem by deleting it from either the CalculatedItems collection or the PivotItems collection of the PivotField:
10.adds a PivotTable based on the data from an Access database