arrays - 无法在 VBA 中初始化数组的值

Question

我还是 VBA 的新手。这是代码：

Sub Macro1()
Dim NumberSeq() As Integer = {1,2,3,4}
End Sub

这只是一个数组的初始化，我看到它对其他人有用。但我总是得到警告窗口：编译错误：预期：语句结束，等号突出显示“=”

不知道这里发生了什么。请指教，万分感谢！！

Answer 1

Sub macro1()
Dim NumberSeq() As Variant

NumberSeq = Array(1, 2, 3, 4) 'an allocated array with length 1 to 4

'check output through print
For i = LBound(NumberSeq) To UBound(NumberSeq)
    msg = msg & NumberSeq(i) & vbNewLine
Next i
MsgBox (msg)

End Sub

对于隐式大小的二维数组，使用 Array(row start To row end, col start to col end)。

这是一个很好的资源。