传递2D数组作为参数:

M M*_*M M 0 arrays vba

Dim arrS(1000, 6) As String

Sub FromHere()
'(I've already filled the array and just want to pass it from here):

 Call ToThere(someArray)
End Sub

Sub ToThere(someArray)
 MsgBox "And I want to use it:  " & someArray(2, 2)
End Sub
Run Code Online (Sandbox Code Playgroud)

我正在尝试的一切都是红线,不会让它脱离编辑器.

你能告诉我如何在顶部和每个语句中声明/标注它,以便它只运行吗?

GSe*_*erg 5

Sub ToThere(someArray() as string)
Run Code Online (Sandbox Code Playgroud)