Tabla de pivote EPPlus - Contraer todo el campo

¿Alguien sabe como hacer esto?

Estoy usando EPPlus en .Net y he creado una tabla dinámica con 2 campos de fila y un campo de datos de resumen:

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

Todo funciona bien, pero quiero que la tabla dinámica comience como colapsada cuando el usuario abre el libro de trabajo (en Excel, cuando está creando la tabla dinámica, puede hacer clic derecho en el elemento de datos y seleccionar "Expandir / Contraer ">" Contraer todo el campo "

Caliente puedo hacer esto a través de código? (Y estoy dispuesto a usar OpenXML directo si EPPlus no admite esto todavía ...)

ADEMÁS, ¿hay alguna manera de eliminar los datos sin procesar del libro de trabajo para que la tabla dinámica aún funcione? ¿Lo he intentado y cuando abro el libro, mi tabla dinámica está en blanco? - Mi lógica actual me ha llevado aesta pregunta... ¿¿Alguna idea??

(Sé que escribí esta pregunta en VB. Pero agregué tanto laC# & VB etiquetas a esta pregunta - Me siento cómodo con el código en cualquiera de los idiomas - ¡Gracias!)

Respuestas a la pregunta(2)

Su respuesta a la pregunta