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

excel中VBA如何在模块中自定义函数,定义好了之后如何在窗体中调用?谢谢,第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
sheet1bb

Public Function SelectFrom8(All As Range, i As Integer, j As Integer)
  SelectFrom8 = AllCells(i, j)Value
End Function

两个问题:

函数的返回值不要指定As Range

用AllCells(i,j)Value来返回指定单元格的值


欢迎分享,转载请注明来源:内存溢出

原文地址: https://www.outofmemory.cn/yw/13402786.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-07-29
下一篇 2023-07-29

发表评论

登录后才能评论

评论列表(0条)

保存