PageFieldWrapCount Property
Returns or sets the number of page fields in each column or row in the PivotTable report. Read/write Long.
Example
This example causes the PivotTable report to draw three page fields in a row before starting a new row.
With Worksheets(1).PivotTables("Pivot1")
.PageFieldOrder = xlOverThenDown
.PageFieldWrapCount = 3
End With