EPPlus-Pivot-Tabelle - Gesamtes Feld reduzieren

Weiß jemand, wie man das macht?

Ich verwende EPPlus in .Net und habe eine Pivot-Tabelle mit zwei Zeilenfeldern und einem zusammenfassenden Datenfeld erstellt:

Dim Pivot As OfficeOpenXml.Table.PivotTable.ExcelPivotTable
Pivot = wksPivot.PivotTables.Add(wksPivot.Cells("A1"), Datarange, "pName")

Pivot.RowFields.Add(Pivot.Fields("Fld1")).Sort = Table.PivotTable.eSortType.Ascending
Pivot.RowFields.Add(Pivot.Fields("Fld2")).Sort = Table.PivotTable.eSortType.Ascending

Dim dtaFld As OfficeOpenXml.Table.PivotTable.ExcelPivotTableDataField
dtaFld = Pivot.DataFields.Add(Pivot.Fields("XYZ"))
dtaFld.Function = Table.PivotTable.DataFieldFunctions.Sum

Alles funktioniert einwandfrei, aber ich möchte, dass die Pivot-Tabelle beim Öffnen der Arbeitsmappe als komprimiert gestartet wird (In Excel können Sie beim Erstellen der Pivot-Tabelle mit der rechten Maustaste auf das Datenelement klicken und "Erweitern / Reduzieren" auswählen ">" Gesamtes Feld reduzieren "

Heiß kann ich das per Code machen ??? (Und ich bin bereit, direktes OpenXML zu verwenden, wenn EPPlus dies noch nicht unterstützt ...)

EBENFALLSGibt es eine Möglichkeit, die Rohdaten aus der Arbeitsmappe zu löschen, sodass die Pivot-Tabelle weiterhin funktioniert? Ich habe versucht, und wenn ich die Arbeitsmappe öffne, ist meine Pivot-Tabelle leer? - Meine derzeitige Logik hat mich dazu geführtdiese Frage... Irgendwelche Gedanken ??

(Ich weiß, dass ich diese Frage in VB geschrieben habe, aber ich habe beide hinzugefügtC# & VB Tags zu dieser Frage - Ich bin mit Code in beiden Sprachen vertraut - Danke !!)

Antworten auf die Frage(2)

Ihre Antwort auf die Frage