VBA CalculatedFields Pivot 使用变量作为字段引用？

Question

我知道如何通过硬编码对数据透视表中特定字段的引用来创建计算字段 table 但我在使用包含名称为字符串的变量时遇到了问题（出现 1004 错误）字段参考如下：

这是我想做的，但是work/errors不行！

Dim currMonth As String
currMonth = "Jan-14"
ActiveSheet.PivotTables("PivotTable6").CalculatedFields.Add "YTD2014", _
currMonth, True

这个很好用

ActiveSheet.PivotTables("PivotTable6").CalculatedFields.Add "YTD2014", _
    "='Jan-14'", True

Answer 1

currMonth 初始化为：

currMonth = "Jan-14"

但应该是：

currMonth = "='Jan-14'"

你看出区别了吗？

VBA CalculatedFields Pivot USe Variables as Field References?