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

Question

我知道如何通过硬编码对数据透视表中特定字段的引用来创建计算字段但是我遇到了麻烦（得到1004错误），使用的变量包含一个字符串，其中包含字段引用的名称，例如下面：

这就是我想要做的，但它不起作用/错误！

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'"

你看到了区别吗？