EffectBlend.FullPath

Property FullPath As Boolean

The FullPath property returns or specifies whether a blend follows a full path. A value of True causes the blend to spread along the whole path.

The following VBA example creates a blend, attaches it to a path, and stretches it so that it follows the complete length of the path.

Sub Test()

Dim sPath As Shape, s1 As Shape, s2 As Shape

Set sPath = ActiveLayer.CreateCurveSegment(0.6, 4.5, 7.8, 8.5, 5.2, 62, 5.3, -96)

Set s1 = ActiveLayer.CreateEllipse2(0, 0, 1)

Set s2 = s1.Duplicate(5, 5)

s1.Fill.UniformColor.RGBAssign 255, 0, 0

s2.Fill.UniformColor.RGBAssign 255, 255, 0

With s1.CreateBlend(s2).Blend

.Path = sPath

.FullPath = True

.RotateShapes = True

End With

End Sub