Hello, 
I am trying to import dwg file to a new part as 2D sketch and want to import each layer to a new sketch in solidworks. 

I am able to import it as a part but unable to get the sketches.

can you please help me with the macro.

Attaching the required task photos and part of macro that I have written.

Option Explicit

Sub main()
   
   'declare variables
   Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc