VBA to search for specific string and delete range

Hi all

For the attached example sheet, I need some simple VBA to search for every time "Title 1" appears (EXCLUDING the first time), and delete the row + 5 rows down.

Meaning that in the attached sheet, EntireRow.Delete applies to A29:A34, A71:A76, and so on. The placement of "Title 1" are variable from project to project, but they ALWAYS come in the same pattern of 6 rows :-)

Things that should remain in the attached sheet should only be Range("1:6") and all the data numbers.

I hope you guys are able to help :-) Thank you very much!