vba函数是有返回值的。
以下是例子
function add(a as integer,b as integer) as integer
add=a+b
end function
把函数名称当作变量,赋值即可。
又如
在VBA编辑器中新建自定义的Function,在“End Function”上一行添加返回值代码,格式如:函数名=要返回的值

2/2
返回工作表中输入自定义函数,如在B2单元格输入:=L(A1)
返回A1单元格的地址

注意事项
函数的类型要各返回值的类型一致,不然会出错而无法正确运行。