DragToRow Property Example
This example prevents the Year field in the first PivotTable report on worksheet one from being dragged to the row position.
Worksheets(1).PivotTables("Pivot1") _ .PivotFields("Year").DragToRow = False