Excel VBA數組學習(四)

接上一篇 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

代碼運行結果如下:

Excel VBA數組學習(四)

本地窗口查看arr1、arr2的數值

Excel VBA數組學習(四)


分享到:


相關文章: