PivotTables 集合对象

指定工作表上所有 PivotTable 对象的集合。

PivotTables 集合对象的用法

可用 PivotTables 方法返回 PivotTables 集合。下例显示工作表“Sheet3”上数据透视表的个数。

MsgBox Worksheets("sheet3").PivotTables.Count

可用 PivotTableWizard 方法创建一个新的数据透视表并将它加入到集合中。下例根据一个 Microsoft Excel 数据库（包含在区域 A1:C100 中）来创建一个新的数据透视表。

ActiveSheet.PivotTableWizard xlDatabase, Range("A1:C100")

可用 PivotTables(index) 返回单个 PivotTable对象，其中 index 为数据透视表编号或名称。下例使工作表“Sheet3”上第一张数据透视表中的字段“Year”成为行字段。

Worksheets("sheet3").PivotTables(1) _
    .PivotFields("year").Orientation = xlRowField

因为对数据透视表进行编程可能会很复杂，所以，最方便的做法是将数据透视表操作录制到宏中，然后再修订所录制的宏代码。在“工具”菜单中选择“宏”命令，再单击“录制新宏”命令，即可录制宏。