vba select listbox value, crayola 120 pencils