如何在Excel中选择数据透视表过滤器的第一个X值

时间:2016-03-02 11:47:49

标签: excel vba pivot

我有一个" Day"在过去6个月的数据透视表中过滤,格式如下:" 2/23/2016"。这些值会随着我添加更多天而每天都在变化,但我需要一个VBA脚本来从底部开始选择前30个值。我可以硬编码"过滤" 2/23/2016",但我想动态选择"从底部开始的前30"无论他们是什么。屏幕截图清晰: Pivot Filter

1 个答案:

答案 0 :(得分: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是您想要显示的底部的值。