>>100-102
ありがとうございます。格納することはできたみたいです。
ただ、行数が未知のCSVファイル(Exel)のデータを
二次元配列に格納するには、どのようにすればよいでしょうか?
↓みたいにやっても上手くいかないみたいなんで…

For i = 0 To UBound(Book1.csv)
For j = 0 To 2
Line Input #1, vntBook1(i)(j)
Next
Next