Macro to Copy Range and Paste in the Empty Row Same Sheet

I just figured it our myself but thanks for all your input.

Here's the Code:

Sub CopyRow()
Dim i As Long

i = Cells(Rows.Count, 1).End(xlUp).Row
Range("A8:J15").Copy
Cells(i + 8, 1).PasteSpecial Paste:=xlPasteAll
Application.CutCopyMode = False

End Sub