Hi,
I've been given this code to highlight newly added codes then insert a line to the right of where that code has been highlighted...
Sub compare4()
LRA = Cells(Rows.Count, "A").End(xlUp).Row
LRB = Cells(Rows.Count, "B").End(xlUp).Row
j = 3 '
For i = 3 To LRB
comp = Application.Match(Range("b" & i), Range("A3:A" & LRA), 0)
If IsError(comp) Then
Range("C" & i).value = Range("b" & i).value
Range("b" & i).Value = ""
Range("C" & i).Interior.ColorIndex = 6
end if
Next i
End Sub
However it doesn't quite work.
I would like it to:
1) highlight any new codes
2) move the rows the right down one so that new info can be inputted...
Please find attached.
Thanks in advance.Test.xlsm
Bookmarks