接上一篇 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分享 的文章