Tabela Dinâmica EPPlus - Recolher campo inteiro
Alguém sabe como fazer isso?
Estou usando o EPPlus no .Net e criei uma tabela dinâmica com dois campos de linha e um campo de dados de resumo:
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
Tudo funciona muito bem, mas quero que a Tabela Dinâmica comece desmoronada quando o usuário abrir a pasta de trabalho (No excel, ao criar a tabela dinâmica, você pode clicar com o botão direito do mouse no elemento de dados e selecionar "Expandir / Recolher" ">" Colapso do campo inteiro "
Hot posso fazer isso via código ?? (E estou disposto a usar o OpenXML direto se o EPPlus ainda não suportar isso ...)
ALÉM DISSO, existe uma maneira de excluir os dados brutos da pasta de trabalho para que a tabela dinâmica ainda funcione? Eu tentei e quando eu abro a pasta de trabalho, minha tabela dinâmica está em branco? - Minha lógica atual me levou aessa questão... Alguma ideia??
(Eu sei que eu escrevi esta pergunta no VB. Mas eu adicionei oC#
& VB
tags para esta pergunta - Estou confortável com o código em qualquer idioma - Obrigado !!)