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）返回一个值，那就是你的问题。