SheetWidth Example
Sub Example_SheetWidth()
' This example returns the SheetWidth setting for the current drawing.
Dim dbPref As AeccDatabasePreferences
Set dbPref = AeccApplication.ActiveDocument.Preferences
MsgBox "The current value for SheetWidth is " & dbPref.SheetWidth, _
vbInformation, "SheetWidth Example"
End Sub