WorkbookPivotTableOpenConnection 事件

发生在数据透视表的连接打开之后。

Private Sub expression_WorkbookPivotTableOpenConnection(ByVal Wb As Workbook, Target As PivotTable)

expression 引用在类模块中带有事件声明的 Applicaton 类型对象的变量。

Wb 必需。选定的工作簿。

Target 必需。选定的数据透视表。

示例

本示例显示一则消息，说明数据透视表与其数据源的连接已经打开。本示例假定您已在类模块中声明了带有事件的 Workbook 类型的对象。

Private Sub ConnectionApp_WorkbookPivotTableOpenConnection(ByVal wbOne As Workbook, Target As PivotTable)

    MsgBox "The PivotTable connection has been opened."

End Sub