arrays - VBA如何在消息框中显示数组

Question

VBA

嗨，我一直在尝试创建一个数组，然后在 msgbox 中显示，但不断收到此错误:

'无效的过程调用或参数'

我在另一个数组上使用了 Join 函数，它工作正常

Sub rangearray()

Dim array1 As Variant

array1 = Range("a1:z1")

MsgBox Join(array1, vbCrLf)

End Sub

Answer 1

我刚刚在 VB6 上以一种简单的方式对其进行了测试，并且可以使用它:

Dim arr(3) As String

arr(1) = "Test"
arr(2) = "Test 2"
arr(3) = "Test 3"

MsgBox Join(arr, vbCrLf)

您确定您的函数 'Range("a1:z1")' 它实际上将数组对象返回给变体 'array1' 吗？

编辑:
您不能在 Join 函数上传递多维数组，它必须是一维数组才能正常工作。所以，如果表达式 array1(1,1) 返回一个值，那就是你的问题。