Share via


ViewChange Event [Access 2003 VBA Language Reference]

Occurs whenever the specified PivotChart view or PivotTable view is redrawn.

Private Sub Form_ViewChange(ByVal Reason As Long)

Reason   The PivotViewReasonEnum constant that indicates how the view was changed. Reason always returns –1 for PivotChart Views.

Example

The following example demonstrates the syntax for a subroutine that traps the ViewChange event. For this example to work, a reference must be set to the Microsoft Office Web Components 10.0 type library.

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

Applies to | Form Object