Thank you for that and also the link to your homepage.

Cheers

"Dick Kusleika" wrote in message
...
Pat


I have thus moved the sheet to a new workbook and kept the link. What
I want to do is run the code from the new workbook to the old
workbook. The code stops at the line:

Set rng = Worksheets("ControlCentre").Range("BH30")

If you use Worksheets without qualifying it with a Workbook object, it
will
assume you mean the activeworkbook (depending on where the code is). If
you're getting a subscript out of range error, it means that there is no
worksheet called ControlCentre in that workbook. To fix, qualify with a
specific workbook

Set rng =
Workbooks("Otherbook.xls").Worksheets("ControlCent re").Range("BH30")

--
Dick Kusleika
Excel MVP
Daily Dose of Excel
www.dicks-blog.com