Propriété AnimationBehavior.ColorEffect (PowerPoint)

Renvoie un objet ColorEffect qui représente les propriétés de couleur pour un comportement d’animation spécifié.

Syntaxe

expression. ColorEffect

expression Variable qui représente un objet AnimationBehavior .

Valeur renvoyée

ColorEffect

Exemple

Cet exemple montre comment ajouter une forme à la première diapositive de la présentation active et comment définir le comportement d’un effet de couleur qui modifie la couleur de remplissage de la nouvelle forme.

Sub ChangeColorEffect()

    Dim sldFirst As Slide
    Dim shpHeart As Shape
    Dim effNew As Effect
    Dim bhvEffect As AnimationBehavior

    Set sldFirst = ActivePresentation.Slides(1)
    Set shpHeart = sldFirst.Shapes.AddShape(Type:=msoShapeHeart, _
        Left:=100, Top:=100, Width:=100, Height:=100)

    Set effNew = sldFirst.TimeLine.MainSequence.AddEffect _
        (Shape:=shpHeart, EffectID:=msoAnimEffectChangeFillColor, _
        Trigger:=msoAnimTriggerAfterPrevious)

    Set bhvEffect = effNew.Behaviors.Add(Type:=msoAnimTypeColor)

    With bhvEffect.ColorEffect
        .From.RGB = RGB(Red:=255, Green:=0, Blue:=0)
        .To.RGB = RGB(Red:=0, Green:=0, Blue:=255)
    End With

End Sub

Voir aussi

AnimationBehavior, objet

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.