Macro to copy/paste dynamic range x times into same sheet

Try this.

Sub CopyBlock()
Dim rngSrc As Range

    Set rngSrc = Range("A2", Range("G" & Rows.Count).End(xlUp))
    
    rngSrc.copy rngSrc.Offset(rngSrc.Rows.Count).Resize(rngSrc.Rows.Count * Range("L1").Value)
    
End Sub