Multicolumn Listbox - Transfer Item

[michaeldh]

Hi,

I have 2 identical 7 column userform list boxes and wish to transfer one row from list box 1 and add to list box 2.

Everything works except for the fact that it only transfers the item in the first colum.

Any ideas how I can get all 7 columns data for the specific row to transfer over?

ListBox2.AddItem ListBox1.Value

Thanks.

 

[mikerickson]

With ListBox2
    .AddItem ListBox1.List(ListBox1.ListIndex, 0)
    .List(.ListCount - 1, 1) = ListBox1.List(ListBox1.ListIndex, 1)
    .List(.ListCount - 1, 2) = ListBox1.List(ListBox1.ListIndex, 2)
    .List(.ListCount - 1, 3) = ListBox1.List(ListBox1.ListIndex, 3)
    .List(.ListCount - 1, 4) = ListBox1.List(ListBox1.ListIndex, 4)
    .List(.ListCount - 1, 5) = ListBox1.List(ListBox1.ListIndex, 5)
    .List(.ListCount - 1, 6) = ListBox1.List(ListBox1.ListIndex, 6)
End With

 

[michaeldh]

Thanks Mike I have got the idea now thanks for your tip.

Michael.