PivotLayout 对象

Chart PivotLayout 多个对象

代表数据透视图报表中字段的位置。

PivotLayout 对象的用法

使用 PivotLayout 属性可返回 PivotLayout 对象。下例创建在第一个数据透视图报表中所使用的数据透视表字段名称的列表。

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