VBA自定义函数的返回值能是数组吗

如题所述

第1个回答 2017-09-19

自定义函数能返回数组的

第2个回答 2017-09-20

当我们使用Excel的内置函数来返回某个值时，如果参数不对，或是找不到，往往会返回#N/A 或者 #Value!等提示信息。
我们在模块中自己编写的VBA代码是否也能返回这些信息呢？
答案是肯定的，因为模块中的代码本身就可以在公式里调用，那么自然也可以返回这些信息了。
但是，很重要的一点是，这些信息不是文本，而是内置的错误值！
下表给出了一些常用的错误值供参考：

Constant Error Number Cell error value
xlErrDiv0 2007 #DIV/0!
xlErrNA 2042 #N/A
xlErrName 2029 #NAME?
xlErrNull 2000 #NULL!
xlErrNum 2036 #NUM!
xlErrRef 2023 #REF!
xlErrValue 2015 #VALUE!

通过调用CVErr(error constant)来返回值，这样在界面上看到的就是我们要显示的错误值了。

例如：
CVErr(xlErrValue)本回答被提问者采纳

相似回答

VBA自定义函数的返回值能是数组吗答：自定义函数能返回数组的

Excel VBA自定义函数怎么返回一个数组答：VBA函数可以返回数组，例子代码：执行效果：

...VBA返回的值通常只有一个,而我想返回一个集合,可不...答：回答：Function myarr() As Variant '这个自定义函数返回的值是数组 myarr = Array("123", 345, "abc") End Function Private Sub CommandButton1_Click() Dim s() Dim i As Integer s = myarr '调用函数,并把返回值赋值给一个数组变量 For i = 0 To UBound(s) Sheet1.Cells(1,...

想要使vba中返回值为两个,应该怎么做答：可以使用数组，例如：函数名 = Array(123,456)就可以返回两个数，调用例子：x = 函数()msgbox x(0)msgbox x(1)

Excel vba应该怎么操作返回的数组答：你是说函数的返回值是一个数组么，可以把这个函数的结果赋值给一个变量，也可以直接函数后面加索引号操作，参考一下如下示例代码：Option Explicit'第一种，直接用函数后面加索引的形式访问返回数组StrToArr(s)(2)Sub test1() Dim s As String s = "1,2,4,5,6" MsgBox StrToArr(s)...

VBA自定义函数,当参数是数组时,该如何书写?答：两个都可以，第二个不能引用单元格区域，每个单元格都是一个参数，需要用逗号分隔第一个比较接近内置函数SUM'Option ExplicitFunction Ssum(ByVal range As range) As Double Dim rng As range For Each rng In range Ssum = Ssum + rng.Value Next rngEnd FunctionFunction Ssum...

大家正在搜

当函数的返回值是数组类型的自定义函数的返回值 c语言函数返回值是数组 c函数返回值为数组 c语言数组作为函数返回值函数值返回数组函数为什么不能返回数组函数不能返回数组无返回值的函数有什么用