如何使用VBA中的showpages为特定值创建枢轴?

时间:2018-02-13 11:11:14

标签: excel vba excel-vba pivot pivot-table

我有一个数据透视表。我正在尝试基于原始数据透视表创建新的数据透视表,但是针对特定值进行了过滤。

到目前为止,我发现了这个:

ThisWorkbook.PivotTables("PivotName").ShowPages PageField:="DATE"

这很棒,因为这一行为枢轴中的所有日期创建了数据透视表,并将它们粘贴到新工作表中。

我希望能够为3个特定日期仅创建3张。任何想法?

非常感谢!

1 个答案:

答案 0 :(得分:1)

您不能将.ShowPages限制为仅显示三个项目。相反,只需将数据透视表三次复制到三张,然后将Date PivotField的.CurrentPage属性设置为您希望为每个页面显示的日期。

有疑问,记录一个宏,执行您想要手动执行的步骤,停止宏录制器,并使用它生成的代码作为起点。