Hi,
I have a column of data in which some cells contain =@SIPP LIMITED. The coding below goes through the column and replaces the =@SIPP LIMITED with AT SIPP LIMITED.
Two of us have tried the coding on two different machines and the VBA Code works as stated. However, on one persons machine they get the Run-time Error 1004: Application-defined or object-defined Error.
I am assuming they have a setting which is different or their excel needs reinstalling? Can anyone shed any light on why it works for two of our machines but not the third person's machine?
Here is the code...
Columns("B:B").Select
Selection.Replace What:="=@SIPP", Replacement:="AT SIPP", LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False, FormulaVersion:=xlReplaceFormula2
Many thanks
I have a column of data in which some cells contain =@SIPP LIMITED. The coding below goes through the column and replaces the =@SIPP LIMITED with AT SIPP LIMITED.
Two of us have tried the coding on two different machines and the VBA Code works as stated. However, on one persons machine they get the Run-time Error 1004: Application-defined or object-defined Error.
I am assuming they have a setting which is different or their excel needs reinstalling? Can anyone shed any light on why it works for two of our machines but not the third person's machine?
Here is the code...
Columns("B:B").Select
Selection.Replace What:="=@SIPP", Replacement:="AT SIPP", LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False, FormulaVersion:=xlReplaceFormula2
Many thanks