Version Conflict With Find/Replace?

[ILoveCheese]

Worksheets("Main").Range("C3:GT69").Select
   Selection.Replace What:="X", Replacement:="", LookAt:=xlPart, _
       SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
       ReplaceFormat:=False

I am working with version 03, and I do not have any issues with the above code. I sent it to a friend who is using 00, and they receive a "application-defined or object-defined error message.... runtime error 1004".

To create the code I used the recorder, highlighted the range did a CTRL H and applied the needed replacement.


Could this issue be due to the difference in versions? Just need some clarification.

 

[sous2817]

Just to be sure, do they also have a sheet named "Main"?

Also, you could just use:

Worksheets("Main").Range("C3:GT69").Replace What:="X", Replacement:="", LookAt:=xlPart, _
       SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
       ReplaceFormat:=False

 

[ILoveCheese]

Yes they do. I sent them the entire workbook, and they haven't renamed/changed anything within it. I can't figure out where the disconnect is.

 

[sous2817]

Have them record the same macro and see if they get similar code. Otherwise, I'm completely stumped...

Sorry for not being more help.

 

[Tom Urtis]

You don't have to go to the sheet, this will do:

Worksheets("Main").Range("C3:GT69").Replace What:="X", Replacement:="", LookAt:=xlPart

If you want to activate the sheet, do this:

Worksheets("Main").Activate
Range("C3:GT69").Replace What:="X", Replacement:="", LookAt:=xlPart

If you want to go to a particular range on a sheet DO NOT do this which you did:
Worksheets("Main").Range("C3:GT69").Select


That will fail if executed from a sheet other than the Main sheet.


Do this instead, though as I said before, no reason to select beforehand:


Application.GoTo Worksheets("Main").Range("C3:GT69")

 

[ILoveCheese]

I actually hadn't even thought of that. I'll give it a go and do a compare.

Thx.

I'm wondering if there is a listing of issues related to backwards compatibility between 03 and 00 floating around anywhere as well.

 

[sous2817]

It looks like Tom has got you on the right track....

 

[ILoveCheese]

Tom,

Thx for that bit of code. I appreciate the help.