I have an issue when trying to insert the drawing view : 

Sub ExportFlatPatternWithDrawing(part As SldWorks.PartDoc, flatPattern As SldWorks.Feature, outFilePath As String, opts As SheetMetalOptions_e, conf As String)

   Dim swModel As SldWorks.ModelDoc2
   Dim swDraw As SldWorks.ModelDoc2
   Dim swView As SldWorks.View
   Dim swSheet As SldWorks.Sheet
   Dim error As ErrObject
   Dim hide As Boolean
Dim swDrawingDoc