excel - Remove value from range populating my listbox -
hello have 2 listboxes. first listbox contains items choose from. after selecting item, user clicks on 'add' command button copy value onto range of second listbox. believe of have seen similar add/remove listboxes. both listboxes created inserting controls , populated input range of items on hidden worksheet. here problem: adding names works fine, 'remove' procedure created seems take long time complete since list of items can more 200 items. i use following code match selected listbox value input range value , clears contents of cell in input range: sub remove() dim r long dim al listbox dim d range dim dd range dim allpick worksheet set al = worksheets("listbox").listboxes("listselected") set allpick = worksheets("columns") set dd = allpick.range("selectednames") al r = 1 .listcount if .selected(r) each d in dd if d.value = .list(r) ...