Delete value in a listbox

[crobertson]

Ok, I have a listbox in my user form and it has a Rowsource of A1:A225, I need to be able to select a value in the list box and hit Command_Button4 to delete it.

Any ideas?

Private Sub CommandButton4_Click()
DeleteName
End Sub

Sub DeleteName()
    ListBox1.Value.Select
    Selection.ClearContents
        End Sub

Also, is there anyway to ignore blank cells in the listbox?

 

[Von Pookie]

Cross-posted:
http://www.ozgrid.com/forum/showthread.php?t=42616