作者：乔山办公网日期：
返回目录：excel表格制作
数组百赋值不能直接这样用 等于 某个单元格度区域……要通过循环语句逐个赋值…问…考虑修改如下答：
Dim aa() As Double
ReDim arr(1 To 1036)
For i = 1 To 1036
arr(i) = Cells(i, 8)
Next
Stop
由于你使用了 动态数组 所以在赋值内前 必须给它一个重新设置范围的语句 ReDim……容
excel函数公式中数组，要真正定义，还是比百较难的。简单的说，数组就是多个元素的集合。一个单元格区域，包含有多个数据，把它作为整体参与数据运算，可以认为这个区域的数据就是一个数组。参度与运算的一组数据,，如{1,3,4,6}，也是一个数组。
excel数组公式，可简单理解版为在运算过程中是多个算式同时进行运算的，或运算结果是多值的。例如：“=A1:A5*B1:B5”，这个算式包含了权A1*B1、A2*B2、A3*B3、A4*B4、A5*B5，其结果也有5个值，公式“=A1:A5*B1:B5”就是数组公式。
可以。
Sub test()
Dim a(0 To 5) '//定义一个一维数组，下标从0到5共6个元素
Dim c(1 To 5, 2 To 3) '//定义一个二维数组
End Sub
for i=1 to 10
listbox1.additem arrdata(i,1)
next
把数组中的第一列添加到Listbox1中