Type | Description | |||
Long | A Long expression that defines the identifier of the OLE event. |
For instance, the following VB sample displays a message box once the user presses a key:
Private Sub Pivot1_OleEvent(ByVal Ev As EXPIVOTLibCtl.IOleEvent) If (Ev.ID = -602) Then MsgBox Ev.ToString End If End Sub
For instance, the following VB sample displays information about the event being fired:
Private Sub Pivot1_OleEvent(ByVal Ev As EXPIVOTLibCtl.IOleEvent) Debug.Print Ev.ToString End Sub