通过VBA在Excel中扩展数据透视表的特定部分和/或跳转到原始位置

Question

  

我有一个按年，季度和月分段的数据透视表。如果我试试   然而，2015年的相应季度扩大了2015年的季度   所有其他年份也都显示出来。我怎样才能扩展四分之一   一年？   
- https://superuser.com/questions/1049881/expanding-specific-sections-of-a-pivot-table-in-excel

这个问题在那里没有答案，但那不是一个编程论坛。我有一个类似的问题。有VBA解决方案吗？

或者，是否有一个VBA代码＆＃34; catch＆＃34;扩展点击，然后跳转到单击加号的原始单元格？

示例文件：http://ge.tt/2dNZ40n2

示例代码（我希望这只适用于 2016 ）：

ActiveSheet.PivotTables(1).PivotFields("Month").PivotItems("3").ShowDetail = True

Answer 1

你可以使用这样的东西吗？这对您来说是一个很好的起点，您每个月都必须创建一个IF THEN

size