如何在Excel中selectPivot Filter的第一个X值

在过去的6个月中，我在数据透视表中获得了“日”filter，格式如下：“2/23/2016”。 这些值每天都会改变，因为我增加了更多的日子，但是我需要一个VBA脚本来从底部开始select前30个值。 我可以硬编码“过滤”2/23/2016“，但我想dynamic地select”底部的第一个30“，不pipe他们是什么。

Answer 1

 ActiveSheet.PivotTables("PivotTable1").PivotFields("Day").CurrentPage = "(All)" With ActiveSheet.PivotTables("PivotTable1").PivotFields("Day") c = 5 For i = .PivotItems.Count To 1 Step -1 If (c > 0) Then .PivotItems(i).Visible = True Else .PivotItems(i).Visible = False End If c = c - 1 Next End With 

我解决了它。 这里是。 C是从底部开始要显示多less个值。