macro to delete row containing "private" then rows beneath upto blank row

Hi Guys,

I have been given a spreadsheet which contains fault logs, this is copied from a web file and pasted into excel.

The headers are all in col A with data below and to the right so

Header 1
Rows 2 to say 15 have details of the faults

Then there is a blank row so Row 16

Row 17 will have another header
Rows 18 to 59 have details of the faults

Etc

The amount of rows will vary every time.

What I need to do is look for a specific word contained in each of the headers ie "private" (this word does not appear in the faults detail rows) then delete that entire row and delete the rows underneath until it finds the next blank row.

Then loop until all the sheet has been checked.

Can anyone help.

I have looked at filtering then delete but not all the rows will have the "private" in them so I am really stuck.

Thanks
Wagstaff