Copy range to new sheet

[KGee]

I have a couple of ranges in one sheet that I want to copy to a new sheet using VBA. So I have range1, range2 and range3 which I want to copy to columns A, B, C in the new sheet. I can do this:

select source sheet
select range
copy range
select destination sheet
select cell A1
paste

But how do I accomplish the same thing in one line without selecting the sheets?

Sheets("Sheet1").Range.Copy .Sheets("Sheet2").Range("A1")

 

[Jonmo1]

It looks like you have it already solved...

Sheets("Sheet1").Range("A1").Copy Sheets("Sheet2").Range("A1")

That will copy A1 from Sheet1 TO Sheet2

 

[KGee]

I should have mentioned that I define the three ranges in the source sheet and the number of cells being copied varies for each. So I'm not sure how to handle copying the range of cells to the clipboard and pasting each into cells A1, B1 and C1 in the destination sheet.