Having some great help from
Tom Ogilvy & Bob Phillips - I need to go a step further with regards to
inserting X amount of rows after the last piece of data. The code I have so
far:

Const NUM_ROWS As Long = 20
Dim iLastRow As Long
iLastRow = Cells(Rows.count, "N").End(xlUp).Row
Rows(iLastRow + 1).Resize(NUM_ROWS)

Because the number of rows would change constantly, I am trying to get the
code to look up a range. My poor attempt:

Rows = Range("Number").Value
Const NUM_ROWS As Long = " & Rows & "
Dim iLastRow As Long
iLastRow = Cells(Rows.count, "N").End(xlUp).Row
Rows(iLastRow + 1).Resize(NUM_ROWS).Insert


Can someone put me back on the right path?
Regards
John