How to find an item and delete row

I save items with a macro to the next blank row..then use a pulldown to select an item latter....how can I use the same pulldown also and go to the list, find that item and delete the row, then I want to sort so there are no blan rows

The following is what I use to delete rows, I myself am not very good at VBA and couldn't really answer your question but maybe you can tinker with this and make it work for you.

sub deleteRows()

Dim r As Integer

For r = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
If WorksheetFunction.CountIf(Range("A" & r & ":AZ" & r), "PVT*") > 0 Then
Rows(r).delete
End If
Next r

end sub

Hi - been playing with things....not sure if I fully understand this.

If my row (say column B has an item in it and it says, "Item 1" in the pull down and I want the VB or macro to find the item in Column B that has "Item 1" in it and delete that row.