Hi all!

I want unlink my equation manager, but the code does not work:

Option Explicit

Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swEqnMgr As SldWorks.EquationMgr

Sub main()
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
Set swEqnMgr = swModel.GetEquationMgr

Dim value As Boolean
value = False
MsgBox (value)
swEqnMgr.LinkToFile = False

End Sub

any suggestions??