SetEffect.Property-Eigenschaft (PowerPoint)

  • Artikel

Legt fest oder gibt eine MsoAnimProperty -Konstante, die eine Animationseigenschaft darstellt. Lese-/Schreibzugriff.

Syntax

Ausdruck. Property

Ausdruck Eine Variable, die ein SetEffect-Objekt darstellt.

Rückgabewert

MsoAnimProperty

Beispiel

Das folgende Beispiel fügt eine Form hinzu. Dieser Form wird eine dreisekündige Füllanimation hinzugefügt. Anschließend wird für die Füllanimation eine Farbe festgelegt.

Sub AddShapeSetAnimFill()

    Dim effBlinds As Effect
    Dim shpRectangle As Shape
    Dim animProperty As AnimationBehavior

    Set shpRectangle = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeRectangle, Left:=100, _
        Top:=100, Width:=50, Height:=50)

    Set effBlinds = ActivePresentation.Slides(1).TimeLine.MainSequence _
        .AddEffect(Shape:=shpRectangle, effectId:=msoAnimEffectBlinds)

    effBlinds.Timing.Duration = 3
    Set animProperty = effBlinds.Behaviors.Add(msoAnimTypeProperty)

    With animProperty.PropertyEffect
        .Property = msoAnimColor
        .From = RGB(Red:=0, Green:=0, Blue:=255)
        .To = RGB(Red:=255, Green:=0, Blue:=0)
    End With

End Sub

Siehe auch

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