Removing data after a blank line

[HelplessFool]

Ok, another question that is beyond me...

When I copy the new spreadsheet of data I get every week into the template I'm working on, I want to automatically strip out any data that follows the text "Additional Data" Alternately, I could strip out any data that follows a blank row since my Additional Data row is followed by a blank row.

 

[JPM]

Couldn't you just run a macro to search for "Additional Data" and then delete the next row?

Something like this:

Sub Macro1()

Columns("B:B").Select
Selection.Find(What:="Additional Data", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
ActiveCell.Offset(1, 0).Select
ActiveCell.EntireRow.Delete
End Sub