Hi everybody,

I use a macro to make copy of opened drawings, but I can't manage to copy the part/assembly attached to this drawing.

Here is my code:

Dim swApp As SldWorks.SldWorks
Dim swDoc As SldWorks.ModelDoc2
Dim ext As ModelDocExtension
Dim errors As swFileSaveError_e
Dim warnings As swFileSaveWarning_e

Set swApp = CreateObject("SldWorks.Application")
Set swDoc = swApp.ActiveDoc

Set ext = swDoc.Extension
Call ext.SaveAs("C:\....", swSaveAsCurrentVersion, swSaveAsOptions_SaveReferenced, Nothing, errors, warnings)

Is there another "save as" method? I can't find anything else interesting...

Thank you!