How do I copy and paste data from a specific worksheet into new one.

[ghrek]

I have a workbook that has a brand new sheet that is named but blank.

Is there anyway via macro that I can copy and paste all the data from the previous sheet in the range A10:AC1330 onto the new sheet.

 

[Coyotex3]

You can try something like this assuming your sheets are titled "Sheet1" and "Sheet2" respectively.

Sub TestOut()
Sheets("Sheet1").Range("A10:AC1330").Copy

Sheets("Sheet2").Range("A1").PasteSpecial xlPasteValues

End Sub

 

[ghrek]

They will not be named sheet 1 etc but will be 2301 / 2302 3,4,5. Etc

 

[Coyotex3]

They will not be named sheet 1 etc but will be 2301 / 2302 3,4,5. Etc

In that case just change the values as such:

Sub TestOut()
Sheets("2301").Range("A10:AC1330").Copy

Sheets("2302").Range("A1").PasteSpecial xlPasteValues

End Sub

Maybe an alternative would be to give the sheet with the source data and the sheet where the data will be copied into specific names. Would that work?