Debug Error

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

Guest

I have the following code which works fine when I import information into a
spreadsheet on my PC but which creates run time errors when replacing Overall
Result with "" when used by someone else. I think we are working on
different versions of Excel. Is there some modification of the code required
for it to run in versions earlier than 2003?

Private Sub Worksheet_Change(ByVal Target As Range)


Columns("A:A").Select
Selection.Replace What:="Overall Result", Replacement:="", LookAt:=xlPart _
, SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("A65536").End(xlUp).Select
ActiveCell.Offset(1, 0).Select
Target.EntireColumn.AutoFit

End Sub
 
SearchFormat and ReplaceFormat were added in xl2002.

Remove them and it should work ok.
 

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

Similar Threads

Need help with a "If" "Else" VB code 4
find and replace multiple values in one statement 3
Macro to select columns and replace data 6
Can I improve processing speed of macro 4
Find and Replace Help 3
Help with a loop please. 10
Debug Error in Code 2
VBA to Fix Dates 5

Back
Top