Compartir a través de


Evento Application.WindowBeforeRightClick (PowerPoint)

Se produce al hacer clic en una forma, una diapositiva, una página de notas o parte del texto. Este evento se desencadena el evento MouseUp.

Sintaxis

expresión. WindowBeforeRightClick( _Sel_, _Cancel_ )

expresión Variable que representa un objeto Application.

Parámetros

Nombre Obligatorio/opcional Tipo de datos Descripción
Sel Obligatorio Selection The selection below the mouse pointer when the right-click occurred.
Cancel Obligatorio Boolean False cuando se produce el evento. Si el procedimiento de evento establece este argumento en True, no aparece el menú contextual predeterminado al finalizar el procedimiento.

Ejemplo:

En este ejemplo se crea un duplicado de la forma seleccionada. Si la forma tiene un marco de texto, agrega el texto "Duplicate Shape" a la nueva forma. Al establecer el argumento Cancel en True, a continuación, impide que aparezca el menú contextual predeterminado.

Private Sub App_WindowBeforeRightClick(ByVal Sel As Selection, Cancel As Boolean)

    With ActivePresentation.Selection.ShapeRange

        If .HasTextFrame Then

            .Duplicate.TextFrame.TextRange.Text = "Duplicate Shape"

        Else

            .Duplicate

        End If

        Cancel = True

    End With

End Sub

Vea también

Objeto Application

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.