EffectBlend.Split

Function Split(StepNo As Long) As Shape

The Split method splits a blend at a specified step. You can split a blend to create a compound blend. The shape in the blend at which point you choose to split the blend becomes the end shape for one component in the blend and the start shape for the other. Thus, the original blend is split into two components.


Parameters	Description
StepNo	Specifies the step in the blend where the split occurs

The following code example creates a blend between two circles, splits the blend in the middle and moves the intermediate control shape upwards by 3".

Sub Test() 
 Dim s1 As Shape, s2 As Shape, s3 As Shape 
 Dim eff As Effect 
 Set s1 = ActiveLayer.CreateEllipse2(0, 0, 1) 
 s1.Fill.UniformColor.RGBAssign 255, 0, 0 
 Set s2 = s1.Duplicate(4, 0) 
 s2.Fill.UniformColor.RGBAssign 255, 255, 0 
 Set eff = s1.CreateBlend(s2, 15) 
 Set s3 = eff.Blend.Split(8) 
 s3.Move 0, 3 
End Sub