Find and remove each item from table

[Demon4231]

I have a sheet that has categories for each item, and some items are new so the category is unknown. Column A is where the category is placed and column C is the item. So what I am trying to do is search column A and if there is an cell that has "UNKNOWN" then remove that item. My problem is I cannot seem to remove all of the unknowns for that item.

Here's my code that I have:

Please Login or Register  to view this content.

If I use that code it removes just the first entry. If I add Range("A1").Activate before I delete the rows then it deletes the first 4 items.

I recorded a macro and the code I got was:

Please Login or Register  to view this content.

which is exactly the same thing I get when I put the DeleteRows varible in a messagebox (except for the extra comma at the end). I did a Range(Left(DeleteRows, Len(DeleteRows) - 1)).Select and it selects the correct cells. Then I deleted them myself and it worked just fine. Any reason this is happening?


I just want to make sure I'm not going crazy.

[JieJenn]

Maybe something like this?

Please Login or Register  to view this content.

[Demon4231]

Maybe something like this?

Please Login or Register  to view this content.

Hmm... very close. All but the first one and the last one were deleted. Maybe I can just do a Find to remove the last two.

[Demon4231]

After getting some sleep I finally got it to work. Here's what I have, which is very simple.

Please Login or Register  to view this content.