Compartilhar via


PivotLayout Object

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