Passing an array as argument for custom Function
When I do that, it seems to only pass the first item in
the array.
For example, lets say I have the following function and
procedu
Sub test()
Dim colors(1 To 10) As Integer
For i = 1 To 10
colors(i) = i + 10
Next i
zzz(colors)
End Sub
Function zzz(ParamArray myarr() As Variant)
Range("B1") = myarr(1)
End Function
When I use myarr(0) in the zzz function, it works fine,
but when I try to use myarr(1), I get a "Subscript out of
range" message.
-----Original Message-----
I'm pretty sure you would just pass the name: zzz(colors)
" wrote:
And how do I enter the argument when I use the function.
Can I just do:
zzz(colors())
-----Original Message-----
Use the ParamArray keyword
Function zzz(ParamArray myarr())
" wrote:
I am trying to find out how to pass an array as an
argument for a custom function.
I have an array colors(1 to 10) and I want to pass
the
whole array into a custom fundtion so I can use the
array
within the function.
Thanks.
.
.
|