当源表包含公式时，使用VBA自动刷新数据透视表

Question

我的目标是let rotation = CGAffineTransform(rotationAngle: CGFloat(degrees * .pi/180)) new = rotation.concatenating(new) 在我对源数据进行更改时自动更新。在此论坛中讨论的“普通”代码（见下文）无效。

Pivot Table

我的设置如下：

• 在一个名为“概述”的选项卡中，我有一些数字（％），我希望进行调整以测试不同的情况。

• 在“组成”选项卡中，我有我的表（称为“输入”），这是我的数据透视表的基础。每当我更改“概述”选项卡中的百分比时，此表中的数字就会更改（显然表中的数字是通过公式生成的。）

• 在“数据透视表”标签中，我的数据透视表称为“测试”。

我已经尝试了使用上述代码的运气。如果我覆盖表中的公式，则数据透视表将自动更新。这意味着该代码适用于该方案。

但是：如果表中的数字由于公式而发生了变化（这意味着“概述”标签中的变化），则我的数据透视表不会更新。

有人知道解决此问题的方法吗？提前非常感谢！

Answer 1

我认为您必须在“成分”和“概述”两个表中都添加Worksheet_Change函数。