Cancel
Showing results for 
Search instead for 
Did you mean: 

Re: The curves belong to a specific sketch rather than all the curves in a session

Valued Contributor
Valued Contributor

As    @cowski1  commented it worked good.

Thanks

Dim parcaSketch as NXOpen.Sketch

  For Each abc As Sketch In workPart.Sketches
            If abc.Feature.Name = "PARCA" Then
                parcaSketch = abc
            End If
        Next
        For Each defg As NXObject In parcaSketch.GetAllGeometry
            lw.WriteLine(defg.Tag)
        Next