- Excel VBA 質問スレ Part34
855 ：デフォルトの名無しさん[sage]：2014/10/23(木) 00:15:30.96 ID:muexFl6z - 配列にforeachで値を格納しようと思っているのですが、うまく行きません。
例として、配列dの全ての要素に1を入れようとしています。
Sub a()
Dim d(2) As Long
For Each Key In d
Key = 1
Next
MsgBox d(0)
End Sub
これはうまく行きませんでした。
このように書くしか無いでしょうか？
Sub b()
Dim d(2) As Long
For i = 0 To UBound(d)
d(i) = 1
Next
MsgBox d(0)
End Sub
また、なぜ上では上手く動かないのでしょうか
|