変数の一部をループ変数で可変にするには？ (ID:118067)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 クラスで宣言しているなら、CallByName関数が使えます。 For i = 1 To 5 CallByName obj, "m0" & i & "Date", VbLet, Date CallByName obj, "m0" & i & "ID", VbLet, ID Next i For i = 1 To 5 Debug.Print CallByName(obj, "m0" & i & "Date", VbGet) Debug.Print CallByName(obj, "m0" & i & "ID", VbGet) Next i