Sub KX_Cut_Setup() Dim s As Shape Dim crv As Curve Dim contourColor As New Color contourColor.CMYKAssign 0, 0, 0, 100 ' Black cut contour For Each s In ActivePage.Shapes If s.Type = cdrCurveShape Or s.Type = cdrPolygonShape Or s.Type = cdrRectangleShape Then ' Assign cut contour outline s.Outline.SetProperties 0.1, OutlineStyles(1), contourColor, OutlinePenStyleSolid s.Outline.ConvertToCutContour End If Next s
It sounds like you're asking about a in CorelDRAW (CDR) — possibly referring to a plugin, macro, or automation script for cutting, contour cutting, or vinyl/plotter cutting. kx cut tool cdr
