Sequence.ConvertToAnimateInReverse Method (PowerPoint)
Determines whether text will be animated in reverse order. Returns an Effect object representing the text animation.
Syntax
expression .ConvertToAnimateInReverse(Effect, animateInReverse)
expression A variable that represents a Sequence object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
Effect |
Required |
Effect |
The animation effect to which the reversal will apply. |
animateInReverse |
Required |
MsoTriState |
Determines the text animation order. |
Return Value
Effect
Example
This example creates a shape with text on a slide and adds a random animation to the shape, ensuring the shape's text animates in reverse.
Sub AnimateInReverse()
Dim sldActive As Slide
Dim timeMain As TimeLine
Dim shpRect As Shape
' Create a slide, add a rectangular shape to the slide, and
' access the slide's animation timeline.
With ActivePresentation
Set sldActive = .Slides.Add(Index:=1, Layout:=ppLayoutBlank)
Set shpRect = sldActive.Shapes.AddShape(Type:=msoShapeRectangle, _
Left:=100, Top:=100, Width:=300, Height:=150)
Set timeMain = sldActive.TimeLine
End With
shpRect.TextFrame.TextRange.Text = "This is a rectangle."
' Add a random animation effect to the rectangle,
' and animate the text in reverse.
With timeMain.MainSequence
.ConvertToAnimateInReverse _
Effect:=.AddEffect(Shape:=shpRect, effectId:=msoAnimEffectRandom), _
AnimateInReverse:=msoTrue
End With
End Sub