Question

如何用VBA传递参数到令一个函数？

例如：
Sub a()
dim i
i =1
End Sub

Sub b()
dim j
j=i
End Sub

如何把函数a的i值传递给函数b使用？
以上代码只是为了表达我想说的意思，不一定要那样写

Answer 1

VBA不是Javascript不允许这样做,你必需得用公共变量,或静太变量或函数A的返回值.
例如
dim i '可以换成public i
sub a()
i=1
end sub

sub b()
dim j
j=i
End sub

或者:
sub a() as integer
dim i
i=1
a=i
end sub

sub b()
dim j
j=a()
end sub

追问

我是新手，你的两条代码第一个b函数i的值为空，除非把dim i 改成public i……第二个运行出错了，缺少语句结束语

追答

语句结束，自己调试一下吧，看看哪里少写或多写了什么，但是大概意思是对的，你把j=a（）改为j=a 或j= call a看看吧，如不行再告诉我，我去调试好了，再发给你

Answer 2

Sub a()
dim i
i =1
call b(i)
End Sub

Sub b(n)
dim j
j=n
msgbox j
End Sub