返回一个代表窗体上的数据透视表的 PivotTable 对象。

expression.PivotTable

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

示例

假定窗体上有一个“数据透视表视图”，下面的示例将报告该指定窗体上所用的 Microsoft Office Web Components 的版本。

Dim objChartSpace As PivotTable

Set objChartSpace = Forms(0).PivotTable

MsgBox "Current version of Office Web Components: " _

    & objChartSpace.Version