Advanced Listbox

[woollyg]

Hi All,

I have a list box where the row source comes from a name manager range, I would like to delete a specific cell (All in column "A") and this will clear the row due to the code. However there are a number of rows that are generic that i do not want to be deleted, but if the row selected doesn't meet the criteria, the cell in column A will be deleted.

Thanks for any help

 

[ranman256]

in your list, add another field for the ones to be deleted..."DELETE"
load the list 1 at a time rather than all in range....

Sheets("data").Activate
Range("A2").Select
While ActiveCell.Value <> ""
   if ActiveCell.offset(0,1).Value ="" then
       cboBox.AddItem ActiveCell.Value
    endif


   ActiveCell.Offset(1, 0).Select 'next row
Wend