Can I ask for some help for removing an item from a listbox?

I wish to add a remove item button.

the listbox is lb1
and the sheetname name it is rowsource to is
checkout range a2:d15

Thanks in advance

Greg