「VBA入門」列挙型(Enum)のサンプル

2021年4月20日

書式
public Enum 列挙型名
サンプルコード

'列挙型Enumの定義
Public Enum User
    ADDR
    AGE
    UUID
    NO
End Enum

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

実行結果
0
1
2
3