Sunday, 23 April 2017

Open SolidWorks Part file by Macro


*This Macro (API) is used for open any file from a specific Location and name

Sub main()

Dim swApp As Object
Set swApp = Application.SldWorks

Dim longstatus As Long, longwarnings As Long
Dim part As Object

Set part = swApp.OpenDoc6("F:\DESIGN LIBRARY\Part8.SLDPRT", 1, 0, "", longstatus, longwarnings)
swApp.ActivateDoc2 "Part8", False, longstatus

End Sub

No comments:

Post a Comment

Note: only a member of this blog may post a comment.