Excel Based BOM macro to save file

HI all,

we have just stared to use the Excel Based BOM function in Solidworks 2014. This solves a load of issues for us and is actually useful.

I was wondering how to create a macro to save the bom to a specific folder on out network. Ive tried running the macro recorder but it doesn't make any sense

Dim swApp As Object

Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Sub main()

Set swApp = _
Application.SldWorks

Set Part = swApp.ActiveDoc
boolstatus = Part.Extension.SelectByID2("@Drawing View1", "BOM", 9.80850184849844E-02, 0.344196913033501, 0, False, 0, Nothing, 0)
End Sub

I would like to just click a macro and it save to my e:\documents\BOM\ folder with the document name and the version number if possible.

I would appreciate some help with this please.

Thanks in advance

Mark

SolidworksApi macros