Hi, If the number in column 3 is 3 and the 1st digit of the number in column 5 is 2 I have to replace this with 1
the following is an excerpt of my code which isnt working, Many Thanks

For i = 1 To lastrow
If cells(i,3) = 3 and left(Cells(i, 5),1) = 1 Then
Cells(i,5) = Replace(Cells(i,5), 1, 1, "1")
'End If
'Next