Compartir a través de


Evento Worksheet.BeforeRightClick (Excel)

Se produce al hacer clic con el botón secundario del mouse (ratón) en una hoja de cálculo, antes de la acción predeterminada.

Sintaxis

expresión. BeforeRightClick (Destino , Cancelar)

Expresión Variable que representa un objeto Worksheet .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Target Obligatorio Range La celda más cercana al puntero del mouse cuando se hace clic con el botón secundario.
Cancel Obligatorio Boolean False cuando se produce el evento. Si el procedimiento de evento establece el valor de argumento en True, la acción de doble clic predeterminada no se realiza al finalizar el procedimiento.

Comentarios

Al igual que otros eventos de hoja de cálculo, este evento no se produce si, al hacer clic, el puntero del mouse se encuentra sobre una forma o una barra de comandos (una barra de herramientas o una barra de menús).

Ejemplo:

En este ejemplo se agrega un elemento nuevo al menú contextual de las celdas B1:B10.

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, _ 
 Cancel As Boolean) 
 Dim icbc As Object 
 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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.