Excel VBA to filldown filled range by n rows

How do I have to amend the code below to fill down the last non-empty row by n (DailyRowsToInsert) rows?

TargetWsDaily.Activate
LastRow = Range("A" & Rows.Count).End(xlUp).Row
LastColumn = Cells(LastRow, Columns.Count).End(xlToLeft).Column

TargetWsDaily.Range("A" & LastRow & ":" & LastColumn & LastRow).FillDown

ActiveCell.Resize(LastRow, LastColumn).Copy Range(Cells(LastRow + DailyRowsToInsert, 1), Cells(LastRow, LastColumn))

Select allOpen in new window