ViewChange 事件

       

只要指定的数据透视图视图或数据透视表视图重画,该事件就会发生。

Private Sub Form_ViewChange(ByVal Reason As Long)

Reason   PivotViewReasonEnum 常量,表明视图有哪些改动。对于数据透视图视图,Reason 总是返回–1。

示例

下面的示例说明了捕获 ViewChange 事件的子程序的语法。为了使该示例奏效,必须设置一个对 Microsoft Office Web 组件10.0 类型库的引用。

Private Sub Form_ViewChange(ByVal Reason As Long)
    If Reason = OWC.plViewReasonShowDetails Then
        MsgBox "You've opted to show details."
    End If
End Sub