TimeLine.InteractiveSequences Property (PowerPoint)
Returns a Sequences object that represents animations that are triggered by click a specified shape.
Syntax
expression .InteractiveSequences
expression A variable that represents an TimeLine object.
Return Value
Sequences
Remarks
The default value of the InteractiveSequences property is an empty Sequences collection.
Example
The following example adds an interactive sequence to the first slide and sets the text effect properties for the new animation sequence.
Sub NewInteractiveSeqence()
Dim seqInteractive As Sequence
Dim shpText As Shape
Dim effText As Effect
Set seqInteractive = ActivePresentation.Slides(1).TimeLine _
.InteractiveSequences.Add(1)
Set shpText = ActivePresentation.Slides(1).Shapes(1)
Set effText = ActivePresentation.Slides(1).TimeLine _
.MainSequence.AddEffect(Shape:=shpText, _
EffectId:=msoAnimEffectChangeFont, _
Trigger:=msoAnimTriggerOnPageClick)
effText.EffectParameters.FontName = "Broadway"
seqInteractive.ConvertToTextUnitEffect Effect:=effText, _
UnitEffect:=msoAnimTextUnitEffectByWord
End Sub