Share via

PivotLayout Object

  • Article
Excel Developer Reference

Represents the placement of fields in a PivotChart report.

Example

Use the PivotLayout property to return a PivotLayout object. The following example creates a list of PivotTable field names used in the first PivotChart report.

Visual Basic for Applications 
  Sub ListFieldNames

Dim objNewSheet As Worksheet
Dim intRow As Integer
Dim objPF As PivotField


Set objNewSheet = Worksheets.Add


intRow = 1


For Each objPF In _
Charts("Chart1").PivotLayout.PivotFields


  objNewSheet.Cells(intRow, 1).Value = objPF.Caption
  
  intRow = intRow + 1



Next objPF


End Sub

See Also