CalculatedFields 方法

返回代表指定数据透视表中所有计算字段的 CalculatedFields 集合。只读。

expression   必需。该表达式返回一个 PivotTable 对象。

示例

本示例使计算结果字段不能被拖至行。

For Each fld in _
        Worksheets(1).PivotTables("Pivot1") _
        .CalculatedFields
    fld.DragToRow = False
Next