CommandBeforeExecute Event
Occurs before a specified command is executed. Use this event when you want to impose certain restrictions before a particular command is executed.
Private Sub Form_CommandBeforeExecute(ByVal Command As Variant, ByVal Cancel As Object)
Command The command that is going to be executed.
Cancel Set the Value property of this object to True to cancel the command.
Remarks
The OCCommandId, ChartCommandIdEnum, and PivotCommandId constants contain lists of the supported commands for each of the Microsoft Office Web Components.
Example
The following example demonstrates the syntax for a subroutine that traps the CommandBeforeExecute event.
Private Sub Form_CommandBeforeExecute( _ ByVal Command As Variant, ByVal Cancel As Object)
Dim intResponse As Integer Dim strPrompt As String strPrompt = "Cancel the command?" intResponse = MsgBox(strPrompt, vbYesNo) If intResponse = vbYes Then Cancel.Value = True Else Cancel.Value = False End If End Sub