Excel VBA教程:GetPivotData方法

返回一个 Range对象,并返回有关数据透视表中数据项的信息。

expression.GetPivotData(DataField, Field1, Item1, Field2, Item2, Field3, Item3, Field4, Item4, Field5, Item5, Field6, Item6, Field7, Item7, Field8, Item8, Field9, Item9, Field10, Item10, Field11, Item11, Field12, Item12, Field13, Item13, Field14, Item14, Field15)

expression   必需。该表达式返回“应用于”列表中的对象之一。

DataField   Variant 类型,可选。字段的名称,该字段包括数据透视表中的数据。

Field1   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item1   Variant 类型,可选。Field1 中项的名称。

Field2   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item2   Variant 类型,可选。Field2 中项的名称。

Field3   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item3   Variant 类型,可选。Field3 中项的名称。

Field4   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item4   Variant 类型,可选。Field4 中项的名称。

Field5   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item5   Variant 类型,可选。Field5 中项的名称。

Field6   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item6   Variant 类型,可选。Field6 中项的名称。

Field7   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item7   Variant 类型,可选。Field7 中项的名称。

Field8   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item8   Variant 类型,可选。Field8 中项的名称。

Field9   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item9   Variant 类型,可选。Field9 中项的名称。

Field10   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item10   Variant 类型,可选。Field10 中项的名称。

Field11   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item11   Variant 类型,可选。Field11 中项的名称。

Field12   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item12   Variant 类型,可选。Field12 中项的名称。

Field13   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item13   Variant 类型,可选。Field13 中项的名称。

Field14   Variant 类型,可选。数据透视表中的列或行字段的名称。

Item14   Variant 类型,可选。Field14 中项的名称。

Field15   Variant 类型,可选。数据透视表中的列或行字段的名称。

Excel VBA教程:GetPivotData方法·示例

在本例中,Microsoft Excel 向用户返回仓库中椅子的数量。本示例假定数据透视表位于活动工作表上。此外,本示例还假设:在数据透视表中,数据字段的标题为“Quantity”,同时还存在标题为“Warehouse”的字段,并且在“Warehouse”字段中有标题为“Chairs”的数据项。


Sub UseGetPivotData()
    Dim rngTableItem As Range
    ' Get PivotData for the quantity of chairs in the warehouse.
    Set rngTableItem = ActiveCell. _
        PivotTable.GetPivotData("Quantity", "Warehouse", "Chairs")
    MsgBox "The quantity of chairs in the warehouse is: " & rngTableItem.Value
End Sub

上页:Excel VBA教程:GetPhonetic方法 下页:Excel VBA教程:GetSaveAsFilename方法

Excel VBA教程:GetPivotData方法

Excel VBA教程:GetSaveAsFilename方法 Excel VBA教程:GoalSeek方法
Excel VBA教程:Goto方法 Excel VBA教程:Group方法
Excel VBA教程:Group方法(ShapeRange对象) Excel VBA教程:Heartbeat方法
Excel VBA教程:Help方法 Excel VBA教程:HighlightChangesOptions方法
Excel VBA教程:Import方法 Excel VBA教程:InchesToPoints方法
Excel VBA教程:IncrementBrightness方法 Excel VBA教程:IncrementContrast方法
Excel VBA教程:IncrementLeft方法 Excel VBA教程:IncrementOffsetX方法
Excel VBA教程:IncrementOffsetY方法 Excel VBA教程:IncrementRotation方法
Excel VBA教程:IncrementRotationX方法 Excel VBA教程:IncrementRotationY方法
Excel VBA教程:IncrementTop方法 Excel VBA教程:InputBox方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号