Copying data from one sheet to another

Hi,

I am currently working on copying ~30000 lines of data from columns A to X. I have found many examples for copying data for each row individually, but I want to copy all of this data to another worksheet all at once. If anyone can point me in the right direction or provide an example, I would appreciate it!

Chadd

Maybe:

Sub arnoldchadd()
Range("A1:X30000").Copy Sheets("another worksheet").Range("A1")
End Sub

Thank you for the quick reply!

I attempted this and I received a Run-time error '1004':

The operation cannot be completed for one of the following reasons

* A selection including cells both inside a table and below it cannot be copied and inserted into that table. Select cells outside the table and try inserting the data again.
*You have attempted to fill data in a way not supported by the table.

Can you attach a sample file with some dummy data that errors?

I just attempted it again after deleting my data, and nothing happens. It executes, but no data is copied.

CopyExample.xlsx

Originally Posted by JOHN H. DAVIS

Can you attach a sample file with some dummy data that errors?

I've attached an example. Let me know if that provides enough information. Thank you again!

This works on your sample. It Assumes you first two rows on Sheet1 are headers so it pastes to row3.

Sub arnoldchadd()
Sheets("Sheet2").Range("A1:X30000").Copy Sheets("Sheet1").Range("A3")
End Sub