' ******************************************************************************
' This is my first SW_VSTA_VB.vbproj and is mostly for a testing and examples
' The SW VBA.swp version was created for comparisons
' This macro can be used for fast drawing sheet creation with the most common features (at least for me)
' ******************************************************************************
' FastDraw.dll is a Macro for SolidWorks (SW) 2009
' FastDraw.swp is a Macro for SolidWorks (SW) 2007
' Built by Tobin Sparks, October 2009
' ------------------------------
' No Warranty, No Refund, No Safety Net
' Use at your own risk
' ------------------------------
' Preconditions: Some initial set up is required
' You will need the following for a test run
' 1) At least one "Sheet Format.slddrt". This may be the Sheet Template you are currently using. Any sheet size will do.
' 2) Either of the following can be used with an Assembly for a test run:   
'    a) At least one "Bill of Materials.sldbomtbt". This may be the BOM Template you are currently using for Assemblies.
'    b) At least one "Bill of Materials.xls".  This may be the BOM Template you are currently using for Assemblies.
' ------------------------------
Description:
Fast Draw is designed to automate the start of a drawing sheet from an open Part or Assembly.
Before the macro can be used the user is required to enter and save the "Sheet Format.slddrt" for each sheet size, (space is provided for A B C D E sheet sizes) and "Bill of Materials.sldbomtbt" and/or "Bill of Materials.xls".
After the settings have been entered and saved, the settings can be changed at any time. The settings are saved in the Windows Registry (HKEY_CURRENT_USER -> Software -> Chispas -> FastDraw).
When the macro is launched the user is required to enter a letter (A B C D E) to indicate the sheet size, and can choose between a SolidWorks or an Excel type BOM Table. 
The macro inserts a sheet and uses the open model to create "Standard 3 Views" and place an "Isometric View" in the upper right area of the sheet.
It also toggles ON "Automatically scale new drawing views". This setting is found at TOOLS -> OPTIONS -> SYSTEM OPTIONS -> DRAWINGS
If a Part document was used the dimensions for the entire model are added to the front view.
If an Assembly document was used the balloons are added to the Isometric View and the BOM is inserted. The sheets should have an anchor inserted at the upper right corner of your title block.
The rest is up to you.

Examples found in this macro:
Windows Registry
Windows FileOpenDialog
Windows show form
Windows GetExtension (VSTA vb)
Windows Opacity (VSTA vb)
Windows Declare Global "Public" Constant (VSTA vb)
SolidWorks swFileLocationsSheetFormat
SolidWorks swFileLocationsBOMTemplates
SolidWorks NewDocument
SolidWorks swDwgPaper(A)size (A B C D E)
SolidWorks swAutomaticScaling3ViewDrawings
SolidWorks Create3rdAngleViews2
SolidWorks CreateDrawViewFromModelView
SolidWorks swInsertDimensionsMarkedForDrawing
SolidWorks swBOMContentsDisplayAtTop
SolidWorks swBomType_TopLevelOnly
SolidWorks swBOMConfigurationAnchor_BottomRight
SolidWorks SetUserPreferenceToggle(swBOMContentsDisplayAtTop, 1) NOT a good example since this doesn't work for Excel type :-(