Procedure fails after updating XP to SP2

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

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?
 
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.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top