API Documentation > CorelDRAW > 2025-v26 > ShapeRange > IVGShapeRange
ShapeRange.ClearEffect method
Clears effects for the shapes in the shape range.
Syntax:
Sub ClearEffect(ByVal Type As cdrEffectType)
Parameters:
Name Type Description
Type
Remarks:
The ClearEffect method removes effects from the shapes in a shape range.
Examples:
The following VBA example removes the contour effect from all rectangles.
Sub Test()
Dim s As Shape
Set s = ActiveLayer.CreateRectangle(2, 2, 4, 4)
s.Fill.ApplyUniformFill CreateRGBColor(255, 0, 0)
s.CreateContour cdrContourOutside
Set s = ActiveLayer.CreateRectangle2(1, 4, 5, 5)
s.Fill.ApplyUniformFill CreateRGBColor(0, 255, 0)
s.CreateContour cdrContourInside
ActivePage.FindShapes(, cdrRectangleShape).CreateSelection
ActiveSelection.ClearEffect cdrContour 
End Sub