Compartir vía


Evento Application.ColorSchemeChanged (PowerPoint)

Se produce cuando se modifica una combinación de colores.

Sintaxis

expresión. ColorSchemeChanged( _SldRange_ )

expresión Variable que representa un objeto Application.

Parámetros

Nombre Obligatorio/opcional Tipo de datos Descripción
SldRange Obligatorio SlideRange Intervalo de diapositivas a las que afecta el cambio.

Observaciones

Las acciones que desencadenan este evento pueden ser del tipo modificar la combinación de colores de una diapositiva o del patrón de diapositivas o aplicar una plantilla.

Para obtener acceso a los eventos de aplicación, declare una variable de aplicación en la sección de declaraciones generales del código. A continuación, establezca a la variable igual al objeto de la aplicación para la que desea tener acceso a eventos. Para obtener información sobre cómo usar eventos con el objeto Application de Microsoft PowerPoint, vea Procedimiento para usar eventos con el objeto Application.

Ejemplo

En este ejemplo se muestra un mensaje cuando se cambia la combinación de colores de la diapositiva o diapositivas seleccionadas. En este ejemplo se supone que se ha declarado un objeto Application denominado PPTApp mediante el uso de la palabra clave WithEvents.

Private Sub PPTApp_ColorSchemeChanged(ByVal SldRange As SlideRange)



    If SldRange.Count = 1 Then

        MsgBox "You've changed the color scheme for " _
            & SldRange.Name & "."

    Else

        MsgBox "You've changed the color scheme for " _
            & SldRange.Count & " slides."

    End If

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.