Timing.TriggerType Property
Represents the trigger that starts an animation. Read/write.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Property TriggerType As MsoAnimTriggerType
Get
Set
'Usage
Dim instance As Timing
Dim value As MsoAnimTriggerType
value = instance.TriggerType
instance.TriggerType = value
MsoAnimTriggerType TriggerType { get; set; }
Property Value
Type: Microsoft.Office.Interop.PowerPoint.MsoAnimTriggerType
MsoAnimTriggerType
Remarks
The value of the TriggerType property can be one of these MsoAnimTriggerType constants. The default is msoAnimTriggerOnPageClick.
msoAnimTriggerAfterPrevious |
msoAnimTriggerMixed |
msoAnimTriggerNone |
msoAnimTriggerOnPageClick |
msoAnimTriggerOnShapeClick |
msoAnimTriggerWithPrevious |
Examples
The following example adds a shape to a slide, adds an animation to the shape, and instructs the shape to begin the animation three seconds after it is clicked.
Sub AddShapeSetTiming()
Dim effDiamond As Effect
Dim shpRectangle As Shape
Set shpRectangle = ActivePresentation.Slides(1).Shapes _
.AddShape(Type:=msoShapeRectangle, Left:=100, _
Top:=100, Width:=50, Height:=50)
Set effDiamond = ActivePresentation.Slides(1).TimeLine.MainSequence _
.AddEffect(Shape:=shpRectangle, effectId:=msoAnimEffectPathDiamond)
With effDiamond.Timing
.Duration = 5
.TriggerType= msoAnimTriggerOnShapeClick
.TriggerDelayTime = 3
End With
End Sub