BulletFormat.RelativeSize Property
Determines whether to set the motion position relative to the position of the shape. Read/write.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Property RelativeSize As Single
Get
Set
'Usage
Dim instance As BulletFormat
Dim value As Single
value = instance.RelativeSize
instance.RelativeSize = value
float RelativeSize { get; set; }
Property Value
Type: System.Single
MsoTriState
Remarks
This property is only used in conjunction with motion paths.
The value of the Relative property can be one of these MsoTriState constants.
Constant |
Description |
|---|---|
msoFalse |
The default. The motion path is absolute. |
msoTrue |
The motion path is relative. |
Examples
The following example adds a shape, adds an animated motion path to the shape, and reports on its motion path relativity.
Sub AddShapeSetAnimPath()
Dim effDiamond As Effect
Dim shpCube As Shape
Set shpCube = ActivePresentation.Slides(1).Shapes _
.AddShape(Type:=msoShapeCube, Left:=100, _
Top:=100, Width:=50, Height:=50)
Set effDiamond = ActivePresentation.Slides(1).TimeLine.MainSequence _
.AddEffect(Shape:=shpCube, effectId:=msoAnimEffectPathDiamond)
effDiamond.Timing.Duration = 3
MsgBox "Is motion path relative or absolute: " & _
effDiamond.EffectParameters.Relative& vbCrLf & _
"0 = Relative, -1 = Absolute"
End Sub