接上一篇 Excel VBA数组学习（三）（数组三发布在微头条上，没有发布文章，麻烦用心的朋友，查找一下。）
五、静态数组和动态数组
静态数组在执行期间不可以改变其上界（最后一个元素的索引号
），而动态数组可以随时修改其上界。
如：dim arr(10) as long 和dim arr(1 to 100) 等，这些都是静态数组。
而对于动态数组，需要dim语句配合Redim 语句或者Redim Preserve 语句来实现。
Sub test()
Dim arr1(), arr2()
arr1 = [A1:D11].Value
arr2 = [A1:D11].Value
ReDim arr1(1 To 2, 1 To 3) '重置数组大小为2行3列的二维数组,数组的中的值丢失
ReDim Preserve arr2(1 To 11, 1 To 3) '重置数组大小为11行3列的二维数组
MsgBox arr1(2, 3) '结果显示为空
MsgBox arr2(2, 3) 'C2单元格的数值
End Sub
代码运行结果如下：
本地窗口查看arr1、arr2的数值
分享到:
閱讀更多 浮雲Excel分享 的文章
