vba - macro to delete rows between named ranges in excel -

how delete rows between named ranges?

i have scenario below

name range 1 : subheader_001 (a1:e1). displays headers name range 2 : subfooter_001 (a40:e40). displays legends , dates.

between these ranges inserting data sql server. cell ranges of subfooter_001 change depending on database records inserted.

i know how delete these database values between named ranges subheader_001 , subfooter_001 . thank you.

i have googled regarding came across below code snippet delete rows below range.

rows(range("myrange").cells(range("myrange").rows.count, 1).row + 1 & ":65536").delete 

the code found deletes rows down last row in versions before excel 2007 (65536 rows)

you want delete rows footer range is.

you replace 65536 range:

dim istartrow integer dim iendrow integer  istartrow =range("subheader_001").row+1 iendrow = range("subfooter_001").row-1  rows(istartrow & ":" & iendrow).delete 

of course, if don't want delete rows, use clearcontents