Sequence.AddEffect-Methode (PowerPoint)

Artikel
04/07/2023

Gibt ein Effect -Objekt, das einen neuen Animationseffekt darstellt, die, einer Sequenz von Animationseffekten hinzugefügt wurde.

Syntax

Ausdruck. AddEffect( _Shape_, _effectId_, _Level_, _trigger_, _Index_ )

Ausdruck Eine Variable, die ein Sequence-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Form	Erforderlich	Shape	Die Form, der der Animationseffekt hinzugefügt wird.
effectId	Erforderlich	MsoAnimEffect	Der anzuwendende Animationseffekt.
Level	Optional	MsoAnimateByLevel	Für Diagramme, Diagramme oder Text, der Ebene, auf die der Animationseffekt angewendet werden. Der Standardwert ist MsoAnimationLevelNone.
trigger	Optional	MsoAnimTriggerType	Die Aktion, die den Animationseffekt auslöst. Der Standardwert ist MsoAnimTriggerOnPageClick.
Index	Optional	Long	The position at which the effect will be placed in the collection of animation effects. The default value is -1 (added to the end).

Rückgabewert

Effekt

Beispiel

Im folgenden Beispiel wird dem ersten Formenbereich auf der ersten Folie eine springende Animation hinzugefügt. Im Beispiel wird davon ausgegangen, dass ein Formenbereich, der mindestens eine Form enthält, auf der ersten Folie ausgewählt ist.

Sub AddBouncingAnimation()

    Dim sldActive As Slide
    Dim shpSelected As Shape

    Set sldActive = ActiveWindow.Selection.SlideRange(1)
    Set shpSelected = ActiveWindow.Selection.ShapeRange(1)

    ' Add a bouncing animation.
    sldActive.TimeLine.MainSequence.AddEffect _
        Shape:=shpSelected, effectId:=msoAnimEffectBounce

End Sub

Siehe auch

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