Give this a whirl...

Sub test1()
Worksheets("Sheet1").Range("data").Copy Worksheets("Sheet2").Range("A20")
End Sub

--
HTH...

Jim Thomlinson


"GreenInIowa" wrote:

Hi,

I have a simple code to paste some data which is in "Sheet1" to "Sheet2".
==========
Sub test1()
Worksheets("Sheet1").Range("data").Copy
Worksheets("Sheet2").Paste Destination:=Range("a20")
End Sub
=======

Although I am clearly defining that it should paste on "Sheet2" it
nevertheless pastes on "Sheet1". Any explanation why it does not paste on
"Sheet2"?

Thanks.