vba中数组是非常实用,常用,好用的一个功能。
如果想快速的计算完结果那么数组是你比较好的选择。
-
创建你的数组
a=range(“a1:a4”)
将a1到a4的单元格内的数放入a中,那么我们也简单的得到了一个数组a
那么如何表达a1单元格的值呢?
msgbox(a(1,1))
这样会弹出一个消息框来表达a1
msgbox(a(2,1))
这样会弹出一个消息框来表达a2,如此类推。 -
循环你的数组
我们同样使用a=range(“a1:a4”)来作为我们数组
for i=1 to ubound(a,1)
msgbox(a(i,1))
next
一段代码表达了依次弹出消息框来表达a1,a2,a3,a4的值
ubound(a,1)
表示了a数组的条数
如果ubound(a,2)
表示了a数组的列数 -
将计算的结果粘贴到表中
a=range(“a1:a4”)
range(“b1:b4”)=a
a1,a2,a3,a4粘贴到b1,b2,b3,b4 -
关于数组的一些拓展性运用
4.1 创建一个动态数组
在现实工作中,我们不知道数据到底有多少条,那么我们一个如何创建一个包含所有行的数组呢?
a=range(“a2:c” & [a1000000].end(xlup).row)
将a2到c2的所有有内容的单元格,如图示