本文讲述的PivotFields方法，在Excel环境下的VBA中使用。
一、PivotFields功能及语法
PivotFields功能：返回代表数据投视表中单个字段（PivotField 对象）或所有可见及隐藏字段集合（PivotFields 对象）的对象。为只读。
语法如下
expression.PivotFields(Index)
参数说明
expression 必需。该表达式返回一个 PivotTable对象。
Index Variant 类型，可选。要返回字段的名称或编号。
注意：对于OLAP 数据源，不存在隐藏字段，返回的对象或集合反映了当前可见的内容。
二、PivotFields代码范例
Set nwSheet = Worksheets.Add
nwSheet.Activate
Set pvtTable = Worksheets("Sheet2").Range("A1").PivotTable
rw = 0
For Each pvtField In pvtTable.PivotFields
rw = rw + 1
nwSheet.Cells(rw, 1).Value = pvtField.Name
Next pvtField
上面代码的功能是：向新工作表列表添加数据投视表的字段名称。