Arrays UBound函数不'；将命名范围作为变量传递时不起作用

MyArray

是一个

（100行x 1列）

包含整数的命名范围

这不起作用：

Function myFunc(MyArray As Variant)

myFunc = UBound(MyArray)

这也不是：

Function myFunc(MyArray As Variant)

myFunc = UBound(MyArray, 1)

---

我确信这是一个相当基本的错误，但我已经在谷歌上搜索了相当多的内容，却没有为自己找到答案。非常感谢您的帮助。

请确保您传递的是变体数组，而不是范围对象。该函数接受

变量

数据类型，可以是任何类型。为了确保它是一个数组，请传递

.Value

Sub Test()

Debug.Print myFunc(Range("A1:A50").Value)

End Sub

Function myFunc(MyArray As Variant)

myFunc = UBound(MyArray, 1)

End Function