Which is the sketch of the sketched part feature?

[Maxim-CADman77]

How do I determine which sketch was used to create the given sketched feature (for example Revolve)?

[JhoelForshav · Accepted solution]

SyntaxEditor Code Snippet

Dim doc As PartDocument = ThisDoc.Document
Dim revolves = doc.ComponentDefinition.Features.RevolveFeatures
Dim revolve As RevolveFeature = revolves.Item("Revolution1")
Dim revolveSketch = revolve.Profile.Parent
MsgBox(revolveSketch.Name)

This code writes out the name of the sketch that contains the profile used in a revolve named "Revolution1" in a part.

Hope its what youre looking for.