Événement Application.ColorSchemeChanged (PowerPoint)
Se produit à la suite de la modification d’un jeu de couleurs.
Syntaxe
expression. ColorSchemeChanged( _SldRange_ )
expression Variable qui représente un objet « Application ».
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| SldRange | Requis | SlideRange | Plage de diapositives affectées par la modification. |
Remarques
Les actions qui déclenchent cet événement sont par exemple la modification du jeu de couleurs d’une diapositive ou du masque des diapositives, ou l’application d’un modèle.
Pour accéder aux événements Application, déclarez une variable Application dans la section des déclarations générales de votre code. Définissez ensuite la variable comme étant égale à l'objet Application pour laquelle vous souhaitez accéder aux événements. Pour plus d’informations sur les événements liés à l’objet Application de Microsoft PowerPoint, voir Utilisation des événements avec l’objet Application.
Exemple
Cet exemple affiche un message lorsque le jeu de couleurs pour la ou les diapositives sélectionnées est modifié. Cet exemple suppose qu’un objet Application appelé PPTApp a été déclaré en utilisant le mot clé 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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.