API Documentation > CorelDRAW > 2025-v26 > PowerClip > IVGPowerClip
PowerClip.LeaveEditMode method
Leaves the edit mode
Syntax:
Sub LeaveEditMode()
Remarks:
The LeaveEditMode method deactivates the PowerClip-editing mode, thereby preventing PowerClip objects from having their contents edited.
Examples:
The following VBA example adds 20 vertical lines to every PowerClip object on the page.
Sub Test()
Const NumLines As Long = 20
Dim s As Shape
Dim pwc As PowerClip
Dim x As Double, y As Double, sx As Double, sy As Double
Dim xx As Double
Dim n As Long
For Each s In ActivePage.Shapes
  Set pwc = Nothing
  On Error Resume Next
  Set pwc = s.PowerClip
  On Error GoTo 0
  If Not pwc Is Nothing Then

 s.CreateSelection

 s.GetBoundingBox x, y, sx, sy

 pwc.EnterEditMode

 For n = 1 To NumLines


xx = x + n * sx / (NumLines + 1)


ActiveLayer.CreateLineSegment xx, y, xx, y + sy

 Next n

 pwc.LeaveEditMode
  End If
Next s 
End Sub