My VBA procedure worked yesterday. This morning I upgraded my XP Professional
with Service Pack 2. After the upgrade, when I tried to run the procedure I
got a Microsoft Visual Basic message box with 400 to the right of the red
circle with the X in it and an "OK" button and a "Help" button. Pressing the
"Help" button just produces a blank page. After stepping through the
procedure I found that the problem appears at the second of these lines:

Sheets("Test Matrix").Activate
Range("A3").Activate 'problem line

This is the first change of active sheet. Prior to this point Range worked
fine. Subsequent attempts to activate a range also failed with same error
even when original sheet was re-activated.

Changing the problem line to:

Activesheet.Range("A3").activate

eliminated the problem on that line.

Am I going to have to add the sheet specification to every occurance of
"Range" (there's a boatload)? Or is there another way to deal with this?




--
Glen

Well, I'm not sure of all of the things you are doing with your code, but
generally it is good practice to avoid activating or selecting ranges
whenever something needs to be done.

If you are doing this:
Sheets("Test Matrix").Activate
Range("A3").Activate
Activecell.clearcontents

You could just as easily be doing this:
Sheets("Test Matrix").range("A3").clearcontents

This is a very simple example, but it is just good programming sense to
eliminate unnecessary lines of code.

Sorry if this isn't what you are looking for.
--
JNW


"GlenC" wrote:

My VBA procedure worked yesterday. This morning I upgraded my XP Professional
with Service Pack 2. After the upgrade, when I tried to run the procedure I
got a Microsoft Visual Basic message box with 400 to the right of the red
circle with the X in it and an "OK" button and a "Help" button. Pressing the
"Help" button just produces a blank page. After stepping through the
procedure I found that the problem appears at the second of these lines:

Sheets("Test Matrix").Activate
Range("A3").Activate 'problem line

This is the first change of active sheet. Prior to this point Range worked
fine. Subsequent attempts to activate a range also failed with same error
even when original sheet was re-activated.

Changing the problem line to:

Activesheet.Range("A3").activate

eliminated the problem on that line.

Am I going to have to add the sheet specification to every occurance of
"Range" (there's a boatload)? Or is there another way to deal with this?




--
Glen