我环顾四周，并没有找到这类问题的答案 . 我做错了可能是微不足道的事情，但我已经尝试了几种不同的格式而没有成功 . 我有一个很长的VBA脚本，它使用计算来确定要包含在数据透视表中的字段 . 然后我将返回的变量字段转换为变量（pivot1，pivot2等） . 我不能在添加计算字段时特别指定字段，因为我不知道它们将是什么 . 第二段代码抛出错误“无法获取数据透视表类的PivotFields属性” . 任何有关这方面的帮助将非常感激 .

ActiveSheet.PivotTables("Pivot Table 1").CalculatedFields.Add "Total", "= pivot1 _
    & " + " & pivot2 & " + " & pivot3 & " + " & pivot4 & " + " & pivot5 & " + " & pivot6 _
    & " + " & pivot7 & " + " & pivot8 & " + " & pivot9 & " + " & pivot10 & " + " & pivot11 _
    & " + "& pivot12", True
ActiveSheet.PivotTables("Pivot Table 1").AddDataField ActiveSheet.PivotTables _
    ("Pivot Table 1").PivotFields("Total"), "Grand Total", xlSum
excel-vba pivot-table calculated-field vba excel