VBA delete entire row if value not found in Listbox

[Nastya621]

Hello experts,

I wrote a code that needs to compare values in range to Listbox items , and if not found in listbox (cause it was moved to Listbox2) then delete the row from range.
Would appreciate any help! Thank you

Please Login or Register  to view this content.

[PCI]

Your code seems nice, what is the issue ?

[Nastya621]

The issue is that it doesnt work. )
it doesnt delete the row which cells vaue is missing in listbox. And i dont understand why...

[PCI]

I launched the form and selected MOL2 and MOL1 and was displayed A,B,C etc.. in the 2 windows and it deleted rows ...!

[Nastya621]

My point is, when i remove item from Listbox1 to listbox2, (e.g. "A"), i want only this row to be deleted from range when i click ok. THis is not working.
it deletes all rows which are found in listbox1.

[mikerickson]

The code in the OP is testing every cell in the range against only one item in the ListBox (the selected item)

If you want to test against every item in the ListBox.

Please Login or Register  to view this content.

[Nastya621]

Thank you!

[PCI]

A bit late but here an update
2 mistakes:
1 - As Mike mentioned it you do not review Listbox values
2 - The range in column "B" is not correct

Please Login or Register  to view this content.