Delete False data from a column

[sky123]

Hi, first off i'm sorry in advanced for my bad English.

I have a daunting task of sorting some old data, process is going well, except i have some data that needs to be deleted.

Raw data is in column A:

Example:

Sara
Winkley
00387-45678
Boston
USA

[single blank cell]

John
00458-4543
Madrid
Spain

[single blank cell]

Mark
Connor
00329-5876
Paris
France

[single blank cell]

...

and so on (data is divided by a single blank cell)

Now data with Sara and Mark are OK, they are complete (five records), data with John are invalid (only four records), data with John needs to be deleted so the row A in a Sheet looks like this:

Sara
Winkley
00387-45678
Boston
USA

[single blank cell]

Mark
Connor
00329-5876
Paris
France

[single blank cell]

...

So basic invalid criteria is only Four records in "a row" between two single blank cells (up and down), five records in "a row" between single blank cells (up and down) are ok records.

I'm stuck at this and any help would be nice...

Thank you

[skywriter]

Try the file below and let me know if this works for you.
If your data does not start in row 1 then change the 1 in the code where you see A1 to whatever it needs to be.

Please Login or Register  to view this content.

[sky123]

This code works great, Thank you very much!