使用Excel VBA控制powerpivot的报表过滤器

Question

我有10个Power Pivot表，这些报告报表过滤器需要使用Excel-2010中的excel VBA由单元格引用控制

正常的数据透视表也是如此。

NewCat = Worksheets(6).Range("G12").Value


Set pt1 = Worksheets(5).PivotTables("PivotTable3")
Set Field1 = pt1.PivotFields("[Lead_f].[Lead_Generation_Month].
[Lead_Generation_Month]")

With pt1
Field1.CurrentPage = NewCat
pt1.RefreshTable
End With

Answer 1

假设主要思想是使所有10个枢轴同步，则非VBA的方法是将切片器添加到枢轴表之一以进行过滤。 然后转到其他每个枢轴，然后将过滤器连接设置到切片器。