在VBA中，動態數組是一種可以根據需要自動調整大小的數組。以下是建立和使用動態數組的一般步驟：
聲明一個變量作為動態數組：使用Dim語句聲明一個變量，并在其后面加上圓括號，如Dim myArray() As DataType。注意，這里的DataType可以是任何數據類型，如Integer、String等。
使用ReDim語句初始化數組的大小：在需要使用數組之前，使用ReDim語句為數組分配內存空間。可以在ReDim語句中指定數組的維數和大小，也可以使用Preserve關鍵字保留數組中的現有數據。例如，ReDim myArray(5)會將數組擴展為包含6個元素的數組，而ReDim Preserve myArray(10)會將數組擴展為包含11個元素的數組，并保留現有的數據。
使用數組：在數組分配了內存空間后，可以使用索引來訪問和修改數組中的元素。例如，myArray(0) = 10會將數組中的第一個元素設置為10。
以下是一個簡單的示例，演示了如何建立和使用動態數組：
Sub DynamicArrayExample()
Dim myArray() As Integer '聲明一個動態數組
ReDim myArray(5) '初始化數組大小為6
'給數組賦值
myArray(0) = 10
myArray(1) = 20
myArray(2) = 30
myArray(3) = 40
myArray(4) = 50
myArray(5) = 60
'輸出數組元素
For i = 0 To UBound(myArray)
Debug.Print myArray(i)
Next i
End Sub
運行上面的代碼將會輸出數組中的所有元素。請注意，UBound函數用于確定數組的上界。
