在Excel VBA中,可以通过将动态分配的数组传递给函数来实现。以下是一种常见的方法:
Function MyFunction(arr() As Variant) As Variant
' 在这里编写函数的逻辑
End Function
Sub Main()
Dim myArray() As Variant
' 动态分配数组并赋值
ReDim myArray(1 To 5)
myArray(1) = 10
myArray(2) = 20
myArray(3) = 30
myArray(4) = 40
myArray(5) = 50
' 调用函数并传递数组
Dim result As Variant
result = MyFunction(myArray)
' 在这里处理函数返回的结果
End Sub
在上述示例中,我们首先定义了一个名为MyFunction
的函数,它接受一个动态分配的数组作为参数。然后,在主程序中,我们声明了一个名为myArray
的动态数组,并将其传递给MyFunction
函数。最后,我们可以在主程序中处理函数返回的结果。
需要注意的是,在函数中对传递的数组进行修改时,原始数组也会被修改,因为VBA中的数组是通过引用传递的。
希望以上信息对您有所帮助!如果您需要了解更多关于Excel VBA或其他云计算相关的知识,请随时提问。
领取专属 10元无门槛券
手把手带您无忧上云