[已解决]关于一维数组定义

zzbilly

如果我想定义arr 数组为a1到a7里面的文字
arr = arry(Range(a1, a7))
MsgBox arr(3)
这样不行 代码应该如何定义?忘老师指点一下

最佳答案

月排行榜 / 总排行榜

zjcat35

2012-7-29 08:14

arr = range(a1:a7) '这样定义出来的是７行一列的数组，他是二维数组！
msgbox arr(3,1)
如果一定要定义一维的话只能这样了
dim arr(1 to 7)
for i = 1 to 7
arr(i) = range("a" & i)
next i

跳转到最佳答案楼层

zjcat35

arr = range(a1:a7) '这样定义出来的是７行一列的数组，他是二维数组！
msgbox arr(3,1)
如果一定要定义一维的话只能这样了
dim arr(1 to 7)
for i = 1 to 7
arr(i) = range("a" & i)
next i

zzbilly

又没到一招 谢谢啦