topic Re: Existing sketch redefine to another workplane in Inventor Programming Forum

Existing sketch redefine to another workplane

ArunS2DHBM — Fri, 02 Jun 2023 09:19:23 GMT

I have Sketch1, which should be redefined to Workplane1 if my parameter1=WP1 and it should be redefined to Workplane2 if my parameter1=WP2

can anyone help me with the Ilogic code.

Re: Existing sketch redefine to another workplane

Andrii_Humeniuk — Fri, 02 Jun 2023 10:18:19 GMT

Hi @ArunS2DHBM . Try this code, and don't forget to check the compatibility of the names of the sketch and the workplanes.

Private Sub Main() Dim oDoc As PartDocument = ThisApplication.ActiveDocument Dim oDef As PartComponentDefinition = oDoc.ComponentDefinition Dim oSketch As PlanarSketch = oDef.Sketches.Item("Sketch1") If parameter1 = "WP1" Then oSketch.PlanarEntity = oDef.WorkPlanes.Item("Workplane1") Else If parameter1 = "WP2" Then oSketch.PlanarEntity = oDef.WorkPlanes.Item("Workplane2") End If End Sub

Re: Existing sketch redefine to another workplane

ArunS2DHBM — Fri, 02 Jun 2023 10:31:39 GMT

Hi @Andrii_Humeniuk ,

Thanks for the code and it's working.

When the sketch is redefined, the constraint is deleted, how can I keep up the constrain? example in sketch1 I have drawn a circle positioned at the line's end point which is projected. i want to keep the constrain .

Can u help me ipon that