有谁知道如何做到这一点?EPPlus枢轴表 - 折叠整个字段
我使用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不支持这个呢......)
还有,有没有办法从工作簿中删除原始数据,以便数据透视表仍然有效?我试过了,当我打开工作簿时,我的数据透视表是空白的? - 我目前的逻辑导致我到this question ...任何想法?
(我只知道我在VB写的这个问题,但我加了两个C#
& VB
标签这个问题 - 我很舒服,在任何一种语言的代码 - 谢谢!)
作为一个附加到这个问题,因为没有人回答了这个问题,我落得这样做创建一个使用EPPlus速度与数据表的表,然后将其保存。然后,我使用Excel.Interop界面打开工作表,创建了数据透视表并使用“Field1.ShowDetail = False”将其折叠为我想要的... –
作为我的附加组件附加组件... The上面的评论不再为我服务,因为我现在想把这个应用程序转移到ASP/IIS,所以Excel Interop不再是一个有效的可能性... –