Hi Kristan,

Change:

destWB.Range("A1").Select

to

Activesheet.Range("A1").Select

---
Regards,
Norman



"Kstalker" wrote in
message ...

Norman


Neither declared nor dimmed.... which I imagine is the issue. Am unsure
how to add.

The error is "runtime error 438 object dosen't support this
property or method"

Kristan


--
Kstalker
------------------------------------------------------------------------
Kstalker's Profile:
http://www.excelforum.com/member.php...o&userid=24699
View this thread: http://www.excelforum.com/showthread...hreadid=466141