Lesson 6.1 start code

Files

Lesson 6.1 start code

Code

Const strModelPath As String = _
    "C:\Users\Keith\Desktop\French press\French press.SLDASM"
Const strFormatPath As String = _
    "C:\programdata\solidworks\solidworks 2011\lang\english\sheetformat\a - landscape - cadsharp.slddrt"
Const strHandlePath As String = _
    "C:\Users\Keith\Desktop\French press\handle.SLDPRT"
Const strBOMTemplatePath As String = _
    "C:\Program Files\SolidWorks Corp\SolidWorks\lang\english\bom-standard.sldbomtbt"
    
Sub main()
    Dim swApp As SldWorks.SldWorks
    Dim swModel As SldWorks.ModelDoc2
    Dim swDraw As SldWorks.DrawingDoc
    
    Set swApp = Application.SldWorks
    
End Sub