Question

在VBA中调用函数时，怎么实现返回多个参数？

Answer 1

按地址引用参数就可以改变传进去的参数的值了。

如下列所示代码：
m和n就被函数addtest改变为3和4了。

Public Function addtest(ByRef a As Integer, ByRef b As Integer)
a = 3
b = 4
addtest = 5
End Function
Sub aa()
Dim m As Integer
Dim n As Integer
addtest m, n
MsgBox m
MsgBox n
End Sub

Answer 2

返回数组地址。