プロが教える店舗&オフィスのセキュリティ対策術

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

A 回答 (3件)

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
    • good
    • 0
この回答へのお礼

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

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

お礼日時:2007/05/02 01:47

こんばんは。



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

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

 Redim Ar(10)

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

です。

Erase Ar()

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

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

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

お礼日時:2007/05/02 01:49

>配列



とは?
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!