TimeLine.InteractiveSequences Property
Returns a Sequences object that represents animations that are triggered by click a specified shape.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
ReadOnly Property InteractiveSequences As Sequences
Get
'Usage
Dim instance As TimeLine
Dim value As Sequences
value = instance.InteractiveSequences
Sequences InteractiveSequences { get; }
Property Value
Type: Microsoft.Office.Interop.PowerPoint.Sequences
Sequences
Remarks
The default value of the InteractiveSequences property is an empty Sequences collection.
Examples
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