使用Top10过滤器在Excel中透视表条目

时间:2014-09-18 07:01:05

标签: vb.net excel vba excel-vba excel-2007

我在我创建的数据透视表上使用Top10过滤器。但是提取了超过10个条目。我检查了调试器。我发现使用Top10过滤器的列。如果值相等(在我的情况下为零),它也会获取这些条目。我只需要10个条目这是我的代码

ActiveSheet.PivotTables("PivotTable5").PivotFields("Period").PivotFilters.Add Type:=xlTopCount, DataField:=ActiveSheet.PivotTables("PivotTable5").PivotFields("Sum of ValueCOCur"), Value1:=10
ActiveSheet.PivotTables("PivotTable5").PivotFields("Order").PivotFilters.Add Type:=xlTopCount, DataField:=ActiveSheet.PivotTables("PivotTable5").PivotFields("Sum of ValueCOCur"), Value1:=10
ActiveSheet.PivotTables("PivotTable5").PivotFields("Order").AutoSort xlDescending, "Sum of ValueCOCur"

This is the output screen!

它获取的条目超过10个,因为Sum of Value字段的值低于0并且全部相等。代码中有什么问题,或者我错过了什么?

0 个答案:

没有答案