Solved: listbox items as variables

[mpearce]

i have a listbox containing 4 items. how can i store each individual item in a variable?

[Tinbendr]

The long way.


Dim A As String
Dim B As String
Dim C As String
Dim D As String
A = ListBox1.List(0)
B = ListBox1.List(1)
C = ListBox1.List(2)
D = ListBox1.List(3)
The short way.
Dim LBItem As Long
For LBItem = 0 To ListBox1.ListCount - 1
MsgBox ListBox1.List(LBItem)
Next

[Norie]

Even shorter, though it does use an array.

arr = Listbox1.List

[mikerickson]

The .List of a ListBox is a 10 column array (unless set larger with the column
ala Dim Arr(0 to (.ListCount-1), 0 to 9)