Simple copy and paste macro

**hernancrespo** · 11-08-2012, 06:21 AM

Hi Sindhus,

The destination sheet name should be "Week 1" and the column D

Sorry I should of thought of this when I posted!

**Sindhus** · 11-08-2012, 06:25 AM

Try this

 Range("A1").Copy Destination:=Sheets("Week 1").Range("D" & Range("A2").Value)

**hernancrespo** · 11-08-2012, 06:29 AM

Alas! no

I get this error?

111111.JPG

"Run-time error "1004"

copy method of range class failed"

When I click Debug it highlights the whole line

**WasWodge** · 11-08-2012, 06:56 AM

Which sheet is the cell A2 that you are referencing on and what is the name of the sheet you are copying from?

**hernancrespo** · 11-08-2012, 07:01 AM

Hi WasWodge,

The sheet I am trying to reference from is called "Diary" and the the reference is on this sheet

So "A2" is on the "Diary" Sheet

Thanks in advance

Jon

**WasWodge** · 11-08-2012, 07:04 AM

Try

Sub CopyMe()
Sheets("Diary").Range("A1").Copy Destination:=Sheets("Week 1").Range("D" & Sheets("Diary").Range("A2").Value)
End Sub

**hernancrespo** · 11-08-2012, 07:30 AM

Hi WasWodge,

Unfortunately I am getting a different error message-

"Run-time error "1004"
Application defined or object defined error"

Thanks for you efforts though!

I'm sure there is a simple solution, but can't for the life of me figure out what it is!