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

VBA

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

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

我在另一个数组上使用了Join函数,它可以工作

Sub rangearray()

Dim array1 As Variant

array1 = Range("a1:z1")

MsgBox Join(array1, vbCrLf)

End Sub

Caio César S.. 9

我刚刚在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)返回一个值,那就是你的问题.

我刚刚在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)返回一个值,那就是你的问题.