excel - 当另一个更改时自动更改数据透视表过滤器

Question

好的，所以我有两个数据透视表，我希望它们始终显示相同的过滤器。问题是，过滤器的标签不同。例如，第一个表中的过滤器“A”对应于第二个表中的过滤器“1”。I have it working fine with a lookup if just one filter is selected, the problem is when multiple filters are selected I don't know how to handle it. 任何想法将不胜感激。

另外，我知道最简单的方法是更改​​过滤器，使它们标记相同，但我无权访问数据，所以这不是一个选项

Answer 1

我正在Worksheet_PivotTableUpdate为我的活动使用该活动。您将获得Target呼叫表。

 Dim chgPt as PivotTable
 Set chgPt = Target

 'You'll need to catch the change for either table.
 If chgPt.Name = "table1" Then 'Change table2
   pt2.PivotFields("nameOfFilter").CurrentPage = chgPt.PivotFields("nameOfFilter").CurrentPage 

 Else 'Change table1
  pt1.PivotFields("nameOfFilter").CurrentPage = chgPt.PivotFields("nameOfFilter").CurrentPage

 End If