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

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

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

如果需要传递参数：

同样可以使用Call：

例如：简盯

Call PicInComment(1, 250)

参数写在后面，不带括号：

例如：

PicInComment 1, 250

也可以赋值给其他变量：

例瞎郑如：

result = PicInComment(1, 250)

两种方法:第一，通过传参数虚指前。参数在子程序里被修改的话，主程序的值也相应改掉（当然传值方法除外）。第二，子程逗吵序差清设置返回值，

private

sub()

as

string

{

sub="ABCD"

}

Sub test()

Dim arr(), H As Long, L As Long

arr = Range("A1:C8")

L = 2

H = 5

MsgBox "工作表的第" &H &"行,第" &L &"列的值是:" &arr(H, L), , Title:="主程序信息"

Call CD(arr, H, L)

End Sub

Sub CD(iarr, iH, iL)

ss = iarr(iH, iL)

MsgBox "工作表的第" &iH &"模春行,第" &iL &"列的值是睁中:" &ss, Title:="子程序悉码山信息"

End Sub

---