PivotLayout Object

Chart
Aa218967.parchild(en-us,office.10).gifPivotLayout
Aa218967.space(en-us,office.10).gifAa218967.parchild(en-us,office.10).gif

Represents the placement of fields in a PivotChart report.

Using the PivotLayout Object

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.

  
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