Loop worksheets Copy range and Paste in LastUsedCell in first worksheet, delete Worksheet

Hi,

I have a loop to copy a data range (find last row for data because it always differs) from worksheet 2, paste it in the "Summary" worksheet (next empty row) and delete ws2, then go on to worksheet 3 and repeat.
I'm finding an error on the paste line :" Method 'Range' of Object '_Worksheet' failed.

This is the current code

Please Login or Register  to view this content.

A couple of things,

Please Login or Register  to view this content.