Do the Copy on one line, then then PasteSpecial.


Windows("TEMP.XLS").Sheets("Sheet1").Range"B3").Co py
Windows("ORIG.XLS").Sheets("Sheet1").Range"B3").Pa steSpecial (xlPasteAll)

should work.

--
Bob Kilmer



"Stuart" wrote in message
...
Is it pooable to paste something into another open workbook without
activating it?

such as :-

Windows("TEMP.XLS").Sheets("Sheet1").Range("B3").P asteSpecial (xlPasteAll)

instead of :-

Windows("TEMP.XLS").Activate
Sheets("Sheet1").Range("B3").PasteSpecial (xlPasteAll)
Windows("ORIG.XLS").Activate