配列を一気に初期化する方法

質問

VBAで、配列を一気に初期化する方法ってありますか？
たとえば、""で初期化する、0で初期化するなど任意に選択できれば嬉しいのですが！！
よろしくお願いいたします。

回答No.2

vyv00522 · ベストアンサー

Erase（下記のTest1)か、又は、
動的配列を使いRedim（下記のTest2)でできますよ。
何も考えずにEraseの方が良いでしょうね。

Sub test1()
Dim sngSuzi(10) As Single
Dim i As Integer

For i = 0 To 10
sngSuzi(i) = i
Debug.Print sngSuzi(i)
Next i

Erase sngSuzi
For i = 0 To 10
Debug.Print sngSuzi(i)
Next i
End Sub

Sub test2()
Dim sngSuzi() As Single
Dim i As Integer

ReDim sngSuzi(10)
For i = 0 To 10
sngSuzi(i) = i
Debug.Print sngSuzi(i)
Next i

ReDim sngSuzi(10)
For i = 0 To 10
Debug.Print sngSuzi(i)
Next i
End Sub

お礼

教えて頂いたEraseで望んでいたものができました

ありがとうございました。

回答No.3

Wendy02

こんばんは。

Ar(10) を配列の変数宣言をすれば、

>""で初期化する、
>0で初期化するなど任意

　Redim Ar(10)

ただし、元のデータ型は、変えられません。
"" は、String 型
0 は、数値型

です。

Erase Ar()

とすれば、何もなくなります。

ただ、これだけの話とは違うような気もしますが……。
配列変数の使いまわしなんて聞いたことがありません。

お礼

内容が意味深くて理解に時間がかかりそうですが、いろいろと考えてみます。ありがとうございました。

回答No.1

ASIMOV

＞配列

とは？