I need to convert a specific sketch completely to construction geometry using a macro.
I just recorded the macro and got the required codes (yes did some cleanup). Change as needed.
Dim swApp As SldWorks.SldWorks
Dim Part As SldWorks.ModelDoc2
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Part.Extension.SelectByID2 "Sketch1", "SKETCH", 0, 0, 0, False, 0, Nothing, 0 'Change sketch name
Part.Extension.RunCommand swCommands_Edit_Select_All, ""
Why you need a macro; edit the sketch, do ctrl + A (select all) and then pick the construction icon.
I want to do it in a macro.
I don't care WHAT the OTHERS SAY about you, you are the man!
Thanks so much
Retrieving data ...