BeforeRightClick Event

Applies To

Chart object, Worksheet object.

Description

Occurs when an embedded chart or worksheet is right-clicked, before the default right-click action.

Syntax 1

Private Sub object_BeforeRightClick(Cancel As Boolean)

Syntax 2

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)

object An object of type Chart declared with events in a class module.

Target The cell nearest to the mouse pointer when the right-click occurs.

Cancel False when the event occurs. If the event procedure sets this argument to True, the default right-click action doesn't occur when the procedure is finished.

Remarks

Like other worksheet events, this event doesn't occur if you right-click while the pointer is on a shape or a command bar (a toolbar or menu bar).

See Also

BeforeDoubleClick event, SheetBeforeDoubleClick event, SheetBeforeRightClick event.

Example

This example adds a new menu item to the shortcut menu for cells B1:B10.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, _
        Cancel As Boolean)
    For Each icbc In Application.CommandBars("cell").Controls
        If icbc.Tag = "brccm" Then icbc.Delete
    Next icbc
    If Not Application.Intersect(Target, Range("b1:b10")) _
        Is Nothing Then
            With Application.CommandBars("cell").Controls _
                .Add(Type:=msoControlButton, before:=6, _
                temporary:=True)
            .Caption = "New Context Menu Item"
            .OnAction = "MyMacro"
            .Tag = "brccm"
        End With
    End If
End Sub