Hi @VJR
I used your code to create pivot tables, but added the line to create a DataField:
new_ws.PivotTables("PivotTable1").AddDataField(new_ws.PivotTables("PivotTable1").PivotFields(valueField), "Anzahl", -4112)
I'm trying to create a pivot table, which uses the same column for row fields...