My userform has Listbox1 and Textbox1. When the form is run, clicking on the Copy Next 5 button adds the
next 5 Listbox1 items to Textbox1 below the previous 5 and so on.
The items are saved in the underlying Sheet2 beginning in Col. H with Row 2.
I can only seem to get this far:
I can't figure out how to add a multiple selection of the next 5 items to Textbox1.
Can someone please help me with this.
Thanks for all your help.
cr
next 5 Listbox1 items to Textbox1 below the previous 5 and so on.
The items are saved in the underlying Sheet2 beginning in Col. H with Row 2.
I can only seem to get this far:
Code:
(clickng Copy button:
Me.TextBox1.Value = Me.TextBox1.Value + Sheets("Sheet2").Cells(2, 7).Value 'copies 1 value
or, using the Listbox1 Change Event:
Private Sub ListBox1_Change()
UserForm1.TextBox1 = UserForm1.ListBox1.List(UserForm1.ListBox1.ListIndex, 2) + add(concantenate?)
the next item
End Sub
Can someone please help me with this.
Thanks for all your help.
cr