「VBA」列挙型(Enum)の定数に値を設定するサンプル

2014年12月31日2021年4月20日

書式
public Enum 列挙型名
メンバ定数 =値
サンプルコード

サンプルコード
 '列挙型Enumの定数に値を設定
Public Enum User
    ADDR = 1
    AGE = 5
    UUID = 2
    NO = 6
End Enum

Sub sample()
    '定数名を呼ぶ
    Debug.Print (User.ADDR)
    Debug.Print (User.AGE)
    Debug.Print (User.UUID)
    Debug.Print (User.NO)
End Sub

結果
1
5
2
6