HI,

i am tring to copy data form one spreadsheet to another within the sam
workbook. i need to use the paste special, adding the values. I wrot
the folowwing code and it goes trough ok. it copies the information bu
it does not paste. and it does not show any problem.

anyone could help?

Thanks

Worksheets("dados").Cells(c, E).Select
Selection.Copy
x = c + 1
z = f + 2
Worksheets("Plan").Select
Cells(x, z).PasteSpecial Operation:=xlPasteSpecialOperationAd

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com

c = 10
e = 5
f = 7
Worksheets("dados").Cells(c,e).Copy
Worksheets("Plan").Cells(c+1,f+2).PasteSpecial paste:=xlValues, _
Operation:=xlPasteSpecialOperationAdd

--
Regards,
Tom Ogilvy


"joao" wrote in message
...

HI,

i am tring to copy data form one spreadsheet to another within the same
workbook. i need to use the paste special, adding the values. I wrote
the folowwing code and it goes trough ok. it copies the information but
it does not paste. and it does not show any problem.

anyone could help?

Thanks

Worksheets("dados").Cells(c, E).Select
Selection.Copy
x = c + 1
z = f + 2
Worksheets("Plan").Select
Cells(x, z).PasteSpecial Operation:=xlPasteSpecialOperationAdd


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/

hi
the pastespecial is not good in your exemple..
To have the value paste special, use PasteSpecial Paste:=xlValue
It should work..
But you can have found this just by record a value paste special on your sheet