Open Specified Sheet in Drawing Document Example (VBA)

This example shows how to open a specific sheet when programmatically opening a drawing document.

'------------------------------------------------------

' Preconditions: Specified drawing document exists on

'                your system.

'

' Postconditions: Specified sheet in specified drawing

'                 document is opened as view-only.

'

' NOTE: Because this drawing document is used by

'       a SolidWorks online tutorial, do not save

'       any changes made to the document when closing it.

'------------------------------------------------------

Option Explicit

Dim swApp As SldWorks.SldWorks

Dim swModel As SldWorks.ModelDoc2

Dim swDocSpecification As SldWorks.DocumentSpecification

Dim sName As String

Dim longstatus As Long, longwarnings As Long

Sub main()

Set swApp = Application.SldWorks

' Drawing document path and name

Set swDocSpecification = swApp.GetOpenDocSpec("C:\Program Files\SolidWorks Corp\SolidWorks\samples\tutorial\advdrawings\foodprocessor.slddrw")

sName = swDocSpecification.FileName

' Sheet name

swDocSpecification.SheetName = "Sheet2"

swDocSpecification.DocumentType = swDocDRAWING

swDocSpecification.ReadOnly = True

swDocSpecification.Silent = False

' Open the specified sheet in the specified drawing document

Set swModel = swApp.OpenDoc7(swDocSpecification)

longstatus = swDocSpecification.Error

longwarnings = swDocSpecification.Warning

End Sub