以编程方式将 GetPivotData 公式分配给单元格答案

【问题标题】：Programmatically assign GetPivotData formula to a cell以编程方式将 GetPivotData 公式分配给单元格
【发布时间】：2017-12-17 04:40:57
【问题描述】：

运行时错误“1004”：

应用程序定义或对象定义的错误

我想用下面的代码设置一个单元格公式：

Selection.Formula = "=GETPIVOTDATA(""Value"";$M$26;""M"";1;""Y"";1396)"

上述公式在工作表中正确工作如下：

=GETPIVOTDATA("Value";$M$26;"M";1;"Y";1396)

但是当我尝试使用宏分配给适当的单元格时，显示上述错误。

如何通过 VBA 宏将此公式分配给单元格？

【问题讨论】：

【解决方案1】：

VBA 标准格式是美式英语。

要么：

将; 更改为,：

Selection.Formula = "=GETPIVOTDATA(""Value"",$M$26,""M"",1,""Y"",1396)"

或者使用.FormulaLocal:

Selection.FormulaLocal = "=GETPIVOTDATA(""Value"";$M$26;""M"";1;""Y"";1396)"

【讨论】：