AnimationBehavior.ColorEffect-Eigenschaft (PowerPoint)

Artikel
04/07/2023

Gibt ein ColorEffect -Objekt zurück, das die Farbeigenschaften für ein angegebenes Animationsverhalten darstellt.

Syntax

Ausdruck. ColorEffect

Ausdruck Eine Variable, die ein AnimationBehavior-Objekt darstellt.

Rückgabewert

ColorEffect

Beispiel

In diesem Beispiel wird der ersten Folie der aktiven Präsentation eine Form hinzugefügt und ein Farbeffektverhalten festgelegt, um die Füllfarbe der neuen Form zu ändern.

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

Siehe auch

AnimationBehavior-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über