返回一个 PivotTable 对象,代表窗体上的“数据透视表视图”。
expression.PivotTable
expression 必需。返回“Applies To”列表中的一个对象的表达式。
假定窗体上有一个“数据透视表视图”,下面的示例将报告该指定窗体上所用的 Microsoft Office Web 组件的版本。
Dim objChartSpace As PivotTable
Set objChartSpace = Forms(0).PivotTable
MsgBox "Current version of Office Web 组件: " _
& objChartSpace.Version