自定义 的 sub 方法还有几种方式可以返回参数的，字符除外。
sub mysub （aa,bb)
bb= 1
end sub
不是很明白您意思，你是要函数返回值，还是参数里面值？
用function
function test()
test =1
end function
application.MsgOut test
如果要返回多个值，那就得用传引用的方式，可以使用Sub
如：
dim V1
dim V2
Sub Test(ByRef V1,ByRef V2)
V1=....
V2=....
End Sub
调用的方法是：
Test(v1,v2) 'v1,v2是参数
[此贴子已经被作者于2016-5-12 11:45:33编辑过]