I'm using the following macro:

Sub rename()
Dim c As Range
Set c = Range("B:B").Find(ActiveCell)
If c Is Nothing Then Exit Sub
ActiveCell = c.Offset(, -1)
End Sub

I need to edit it so that the find is for "match entire cell contents"

Thanks for the help!

-Tamara


--
nis75p06
------------------------------------------------------------------------
nis75p06's Profile: http://www.excelforum.com/member.php...o&userid=26949
View this thread: http://www.excelforum.com/showthread...hreadid=401692