1. Use this code:
Dim swApp As SldWorks.SldWorks Sub main() Set swApp = Application.SldWorks swApp.RunCommand swCommands_File_Copy_Design, Empty End Sub
2. You will need to use the SolidWorks File Explorer if you want a GUI without a document open in SolidWorks.
I think the Pack-and-go can't be used befor SolidWorks2010.
SolidWorks Explorer could open the same pack dailog ,
so I think have a code to open the pack dailog.
Really there is no other way？
In SLDSHELLUTILSLib Library，there is a method:
SldShellUtils 1.0 Type Library
But, I don't know how to use it.
How to use the [SldCopyDesign.CopyDesign]?
I found the following code can shell pack dialog.
Dim MyCopy As SLDSHELLUTILSLib.SldCopyDesign
Set MyCopy = New SldCopyDesign
MyCopy.CopyDesign False, "File path", 0