Userform Delete selected item from another workbook

[Directlinq]

Hi i have 2 workbooks open, and in workbook 1 i have a userform listbox showing the contents of A1 to A500 in workbook 2. The range A1 to A500 is constantly being alphabetically sorted. In workbook 1 i want to be able to select an entry in the listbox and hit a delete button and it will find it on workbook 2 and delete it.

Is there a macro that could do this for me?

Many Thanks