GlobaLevel,
Ciò dovrebbe farla:
Per i = 0 a Me.ListBox1.ListCount - 1
Se Me.ListBox1.Selected (i) = allora allineare
myarray (0, 0) = ListBox1.List (i, 0)
myarray (0, 1) = ListBox1.List (i, 1)
myarray (0, 2) = ListBox1.List (i, 2)
Concluder se
Dopo i
Patrick