AnsweredAssumed Answered

remove all relations of active sketch

Question asked by Sigert Mevissen on Mar 4, 2019
Latest reply on Mar 4, 2019 by Rob Edwards

I want all the relations in a sketch to be removed with the help of a macro. But after recording and running the macro, nothing seems to happen. I added a random sketch.

 

Dim swApp As Object

Dim Part As Object

Dim boolstatus As Boolean

Dim longstatus As Long, longwarnings As Long

 

Sub main()

Set swApp = Application.SldWorks

Set Part = swApp.ActiveDoc

Part.SketchConstraintsDelAll

End Sub

Attachments

Outcomes