LastRow and LastCol would make only one cell. How about this:

Range("A" & LastRow & ":" & Cells(LastRow, LastCol).Address).Copy