Excel VBA调用子程序时如何传递参数

Excel VBA调用子程序时如何传递参数,第1张

VBA调用子拦神和程序时,如果不带参数

直接写sub过程名,或者Call sub名称即可。

如果需要传递参数:

同样可以使用Call:

例如:简盯

Call PicInComment(1, 250)

参数写在后面,不带括号:

例如:

PicInComment 1, 250

也可以赋值给其他变量:

例瞎郑如:

result = PicInComment(1, 250)

你的表述比较费劲。。。我理解的意思是取值这个功能本身行数太旅桥多了你想把它作为一个函数来调用减少代码量。

Function GetValue(para1 as xxx, para2 as xxx) as xxx '取值函数,中间是参数

...'这里旁芦写根据不同参数的取值过程

Set GetValue = xxxx '取到的值要赋给GetValue这个函数名作为返回值

end function

Sub YourMain() ‘你的主函数,中间调用了取值函数

...

Select Case xxJudge

Case xx to xxx

Set xxxx = GetValue(xx, xxx)

Case oo

Set xxxx = GetValue(oo,oo)

....

Case Else

Set xxxx = GetValue(xxxx,xxxx)

End Select

end Sub

希望我理解对了而且你能看懂。

如果你是做Excel VBA编程的话,可以看看编辑器自带的帮助,里面的例子很多很容易懂运镇带的


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

原文地址: http://outofmemory.cn/yw/12346116.html

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

发表评论

登录后才能评论

评论列表(0条)

保存