简单范例
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
sheet1bbPublic Function SelectFrom8(All As Range, i As Integer, j As Integer)
SelectFrom8 = AllCells(i, j)Value
End Function
两个问题:
函数的返回值不要指定As Range
用AllCells(i,j)Value来返回指定单元格的值
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)