OverrideOpen Example

Land Auto

OverrideOpen Example

Sub Example_OverrideOpen()
    
    ' This example returns the OverrideOpen setting.
    Dim prefUser As AeccPreferencesUser
    Set prefUser = AeccApplication.Preferences.User
    
    MsgBox "The current value for OverrideOpen is: " & prefUser.OverrideOpen, _
        vbInformation, "OverrideOpen Example"
    
End Sub