ColumnFields Property [Excel 2003 VBA Language Reference]

Returns an object that represents either a single PivotTable field (a PivotField object) or a collection of all the fields (a PivotFields object) that are currently shown as column fields. Read-only.

expression**.ColumnFields(Index)**

expression Required. An expression that returns a PivotTable object.

Index   Optional Variant. The field name or number (can be an array to specify more than one field).

Example

This example adds the field names of the PivotTable report columns to a list on a new worksheet.

Set nwSheet = Worksheets.Add
nwSheet.Activate
Set pvtTable = Worksheets("Sheet2").Range("A1").PivotTable
rw = 0
For Each pvtField In pvtTable.ColumnFields
    rw = rw + 1
    nwSheet.Cells(rw, 1).Value = pvtField.Name
Next pvtField

Applies to | PivotTable Object

See Also | DataFields Property | HiddenFields Property | PageFields Property | PivotFields Property | RowFields Property | VisibleFields Property