PasteSpecial with adding

[stranger123]

Hi,

In Excel VBA, I failure to paste whole usedrange from a sheet in another workbook onto the sheet in current workbook with adding operation.

......Copy
aRange.PasteSpecial Paste:=xlPasteValues, operation:=xlPasteSpecialOperationAdd

That was working if I copy from the same workbook.

Can you suggest the working code?

Thank you in advance.

 

[PHV]

What is the failure ?
Computer crash ? Error message ? Unexpected behaviour ? ...

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[stranger123]

Sorry, I forgot to say! I was able to paste the values from the whole usedrange of the outside workbook, but without adding the values onte the sells.
Say, I got cells(1,1)=1 in sheet1 in current workbook, and got cells(1,1)=2 in sheet1 in an outside workbook. I then copied the valu of 2 from outside and did pastespecial, after that, in current workbook cell(1,1)=2 (was only replaced). I want it become 1 + 2 = 3.

 

[PHV]

What happen if you do it manually ?
If it works as expected, what is the code generated by the macro recorder ?

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[stranger123]

PHV,

Thank you.
I can do it within the same workbook manually, but don't know how to do it for the outside workbook!

 

[stranger123]

Hi,

I think I found that. We need to add the other workbook in the same excel application.......

Thank you again for your help.