_Master.TimeLine Property
Sets or returns the time at a given animation point. Read/write.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
ReadOnly Property TimeLine As TimeLine
Get
'Usage
Dim instance As _Master
Dim value As TimeLine
value = instance.TimeLine
TimeLine TimeLine { get; }
Property Value
Type: Microsoft.Office.Interop.PowerPoint.TimeLine
Single
Remarks
The value of the Time property can be any floating-point value between 0 and 1, representing a percentage of the entire timeline from 0% to 100%. For example, a value of 0.2 would correspond to a point in time at 20% of the entire timeline duration from left to right.
Examples
This example inserts three fill color animation points in the main sequence animation timeline on the first slide.
Sub BuildTimeLine()
Dim shpFirst As Shape
Dim effMain As Effect
Dim tmlMain As TimeLine
Dim aniBhvr As AnimationBehavior
Dim aniPoint As AnimationPoint
Set shpFirst = ActivePresentation.Slides(1).Shapes(1)
Set tmlMain = ActivePresentation.Slides(1).TimeLine
Set effMain = tmlMain.MainSequence.AddEffect(Shape:=shpFirst, _
EffectId:=msoAnimEffectBlinds)
Set aniBhvr = tmlMain.MainSequence(1).Behaviors.Add _
(Type:=msoAnimTypeProperty)
With aniBhvr.PropertyEffect
.Property = msoAnimShapeFillColor
Set aniPoint = .Points.Add
aniPoint.Time= 0.2
aniPoint.Value = RGB(0, 0, 0)
Set aniPoint = .Points.Add
aniPoint.Time= 0.5
aniPoint.Value = RGB(0, 255, 0)
Set aniPoint = .Points.Add
aniPoint.Time= 1
aniPoint.Value = RGB(0, 255, 255)
End With
End Sub