Кто-нибудь знает как это сделать?

Я использую EPPlus в .Net и создал сводную таблицу с 2 полями строки и одним полем сводных данных:

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

Все отлично работает, но я хочу, чтобы сводная таблица начиналась как свернутая, когда пользователь открывает рабочую книгу (в Excel, когда вы создаете сводную таблицу, вы можете щелкнуть правой кнопкой мыши элемент данных и выбрать «Развернуть / Свернуть» ">" Свернуть все поле "

Горячий я могу сделать это с помощью кода? (И я готов использовать прямой OpenXML, если EPPlus еще не поддерживает это ...)

ТАКЖЕЕсть ли способ удалить необработанные данные из книги, чтобы сводная таблица все еще работала? Я пытался, и когда я открываю книгу, моя сводная таблица пуста? - Моя нынешняя логика привела меня кэтот вопрос... Есть идеи??

(Я знаю, что написал этот вопрос в VB. Но я добавил обаC# & VB теги к этому вопросу - я доволен кодом на любом языке - спасибо !!)