Hi there, the following code almost works, however it does not remove the middle range as desired, any suggestions!
"B" & i works ok
"O" & i works ok
"L" & i DOES NOT WORK
Dim i As Long
For i = Lastrow To 3 Step -1
If Cells(i, 1).Value > 0 Then
Range("B" & i & ",L" & i & ",O" & i).Replace What:="ZX ", Replacement:="", LookAt:=xlPart, SearchOrder:= _
xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
End If
Next
Thanks Graham
"B" & i works ok
"O" & i works ok
"L" & i DOES NOT WORK
Dim i As Long
For i = Lastrow To 3 Step -1
If Cells(i, 1).Value > 0 Then
Range("B" & i & ",L" & i & ",O" & i).Replace What:="ZX ", Replacement:="", LookAt:=xlPart, SearchOrder:= _
xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
End If
Next
Thanks Graham