API Documentation > CorelDRAW > 2025-v26 > EffectBlend > IVGEffectBlend
EffectBlend.FuseEnd method
Fuse End
Syntax:
Function FuseEnd() As Boolean
Remarks:
The FuseEnd method fuses the end components of two blends, attached to one shape, into one blend by removing the intermediate shape.
Examples:
The following VBA example creates two blends between three circles and then merges the blends by removing the middle circle.
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, 3)
Set s3 = s1.Duplicate(8, 0)
s3.OrderFrontOf s2
s2.Fill.UniformColor.RGBAssign 255, 255, 0
Set eff = s1.CreateBlend(s2)
s2.CreateBlend s3
eff.Blend.FuseEnd 
End Sub