excel中VBA如何在模块中自定义函数，定义好了之后如何在窗体中调用？谢谢

Question

如题所述

Answer 1

vb函数分sub（无返回值）以及function（有返回值）
简单范例
Public
Function
ss()
As
String
ss
=
"我是"
End
Function
注意，想定义的函数能够在窗体或别的模块调用，该函数必须是public的，也就是第一个关键字必须为public
function的调用很简单，直接写函数名和参数
如
msgbox
ss
而sub的调用直接call，如：
Public
Sub
ss()
ss
=
"我是"
End
Sub
调用call
ss
另外一点需要注意，调用模块定义的函数，直接写函数名。但如果调用窗体的函数，就得把窗体加上。比如，我要调用sheet1下的bb函数，则该写成
call
sheet1.bb

Answer 2

在模块里定义：
function
aa(a)
aa=a
end
function
窗体里调用：
x=aa(1)
msgbox
x