I'm sorry to bother you but it didn'w work I have added an example of what
I'm trying to do.
A B C D
2122 2132 1
2145 2122 5
2144 2145 7
2752 2178 6
2145 5
2752 7


I need to find a matching value in C with A and return value found in D to
column B.
example: search column C found match with A (2122) take value from D (5) and
put in column B adj to 2122.

Thanks again.
Pat

"Simon Lloyd"
wrote in message
...

If i understood you correctly this should work!
Regards,
Simon

Sub findit()
Dim mycell
Dim rng As Range
Set rng = Range("A:A")
For Each mycell In rng
If mycell.Offset(0, 2).Value = mycell.Value Then
mycell.Offset(0, 1).Value = mycell.Offset(0, 3).Value
End If
Next
End Sub


--
Simon Lloyd
------------------------------------------------------------------------
Simon Lloyd's Profile:
http://www.excelforum.com/member.php...fo&userid=6708
View this thread: http://www.excelforum.com/showthread...hreadid=552076