using array as argument in VBA sub

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I am trying to pass an array to a subroutine. I always get an error.

in calling code:
MMBkList = Array("Add to Not Budgeted", "Add to Charity", "Add to
Cash")
Call mylistbox("Add to which Column?", MMBkList, col)
..
..
..

Sub MyListBox(Cptn As String, ByRef List() As Variant, Item)

Help?

Thanks,
DRA
 
Changing List() to List will work, however, it would be better to use
another variable name; maybe vList.
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware



"DRA" <[email protected]>
wrote in message
I am trying to pass an array to a subroutine. I always get an error.

in calling code:
MMBkList = Array("Add to Not Budgeted", "Add to Charity", "Add to Cash")
Call mylistbox("Add to which Column?", MMBkList, col)

Sub MyListBox(Cptn As String, ByRef List() As Variant, Item)

Help?
Thanks,
DRA
 
Sub MyListBox(Cptn As String, ByRef List, Item)


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)
 
Try removing the () after List, ie:

Sub MyListBox(Cptn As String, ByRef List() As Variant, Item)

A variant can hold an array by itself. You do not need an array of
Variants.

Regards,
Steve
 
Or do it this way in Excel 2000 or later:

Sub AAA()
Dim MMBkList() As Variant
MMBkList = Array("Add to Not Budgeted", "Add to Charity", "Add to Cash ")
Call MyListBox("Add to which Column?", MMBkList, col)
End Sub

Sub MyListBox(Cptn As String, ByRef List() As Variant, Item)

End Sub
 
Back
Top