Item Method (PivotFields Collection) Example
This example makes the Year field a row field in the first PivotTable report on Sheet3.
Worksheets("sheet3").PivotTables(1) _ .PivotFields.Item("year").Orientation = xlRowField