Find "single row" and delete them

Hi Leith and everyone,

Sadly I recognized, that that macro makes some kind of mistake
1.) It does not delete every "single-value-row"
2.) However it seems to delete too many rows
3.) I could not apply that macro to a selection of a huge number of rows
(e.g. 4000)

I will definitely work on a solution - If someone else is interested to do so before I would be very grateful

I will attach an excel file (without the two macro-versions above).
It contains two columns, the first is the "ID" of a person (here person 13 and 14), the second column contains the values I would like to filter for.

Best, Johann