Control the long integer value assigned to each item in the list, simply set the constant equal to a value : Enum « Data Type « VBA / Excel / Access / Word

1. VBA / Excel / Access / Word
2. Data Type
3. Enum

Control the long integer value assigned to each item in the list, simply set the constant equal to a value

 
'Working with Enumerated Types
Public Enum PersonTypeList
    Client = 10
    PersonalContact = 5
    Vendor = 2
    Other = 999
End Enum

Sub EnumM()
   Dim pt As PersonTypeList
   pt = Client
   
   Debug.Print pt

End Sub

 

Related examples in the same category