Importing data from SolidWorks

Hi all

I want to import data such as a drawing no. from SolidWorks to Excel. Furthermore, it has to import it without opening SolidWorks :D

Does any1 have a clue about doing this?

VB Code:

Dim swApp As Object
Dim DrwNo As Object
Sub main()
Set swApp = Application.SldWorks
Set DrwNo = swApp("Draw no.")
Sheet1.Cells(2, 1).Text = swApp.DrwNo
End Sub