Enum列挙型を使用【ExcelVBA】

Enumステートメントで整数型の複数の定数をひとまとまりにする

Public、Privateを最初に記述し、Publicであればプロジェクト全体、Privateであればモジュール内のみ

省略した場合はPublic同様になる

列挙型の名前に要素名と要素に整数を設定していく

最初の要素の整数を省略した場合０から連番となる

２番目以降を省略した場合、前の要素の整数+1になる

間に整数を設定する事も可能でその場合、次の要素はその整数の数+１から開始

ｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰ

実際に使用したサンプルコード

Option Explicit
Enum 設定

列 = 6
ID = 17
pw
名前
住所

End Enum
Public Sub Sample()

MsgBox "idは" & Cells(設定.ID, 設定.列).Value
MsgBox "pwは" & Cells(設定.pw, 設定.列).Value
MsgBox "名前は" & Cells(設定.名前, 設定.列).Value
MsgBox "住所は" & Cells(設定.住所, 設定.列).Value

End Sub