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. |
Comentarios
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
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.