Tom,

Hopefully you're still around?

If so, then....

I have the declared and set the following variables and have tried
using them both withing the adjusted code without success?

Dim OCB As Workbook
Dim OCS As Worksheet

Set OCB = ActiveWorkbook
Set OCS = OCB.ActiveSheet

Any ideas?

Thanks,

Adrian


--
Kobayashi
------------------------------------------------------------------------
Kobayashi's Profile: http://www.excelforum.com/member.php...nfo&userid=871
View this thread: http://www.excelforum.com/showthread...hreadid=276260