将工作表区域的内容赋值给一个数组,网上查了很多文章,但是感觉讲得都不是太透彻,再次记录自己的方法。
#一、将一行数据赋值给数组
##(一)新建数组
如果单元格区域只有一个单元格,那么只需要一个变量就可以表示单元格的值;如果单元格区域包含多个单元格,需要用Variant类型的变量去接收。变体型(Variant)变量可以接受任何类型的数据。
##(二)接收数据
直接将单元格区域.value 赋值给定义的变量即可。
Sub arrayShow()
Dim arr As Variant
arr = Range("A2:F2").Value
Stop
End Sub
注意:stop 语句是用来暂定程序运行,从而便于在本地窗口查看数据结构。
##(三)数组分析
注意当Variant变量接收单元格区域的值之后,就会变成一个二维数组,同行的数据表现为二维数组的一行多列中。
#二、将一列数据赋值给数组
Sub arrayShow1()
Dim arr As Variant
arr = Range("A2:A6").Value
Stop
End Sub
如上图所示,一列数据在数组中表现为不同行的第一列。