sharky12345
09-04-2015, 11:58 PM
How can I either change this or amend it so that it also pastes to Sheets("Stock") from D4 down?
If ListBox2.Selected(i) = True Then Worksheets("Issued").Range("B65536").End(xlUp).Offset(1, 0).Value = ListBox2.List(I)
Posted elsewhere too;
http://www.mrexcel.com/forum/excel-questions/880652-copy-selected-items-listbox-multiple-ranges.html
If ListBox2.Selected(i) = True Then Worksheets("Issued").Range("B65536").End(xlUp).Offset(1, 0).Value = ListBox2.List(I)
Posted elsewhere too;
http://www.mrexcel.com/forum/excel-questions/880652-copy-selected-items-listbox-multiple-ranges.html