Now, just to get difficult, I decided to identify a surname, firstname pair
and do something similar:

Sub TryToo()
Dim myCell As Range
For Each myCell In Range("E8546", Range("E65536").End(xlUp))
If myCell.Value < myCell(2, 1).Value Then
myCell(1, 13).FormulaR1C1 = "=RC[-14] & ", " & RC[-13]"
End If
Next myCell
End Sub

If I run it with just "=RC[-14]", it delivers the surname value. However I
get the error when I try to concatenate the first name field RC[-13].

Where am I going wrong, mother darling? {{Old English music hall song}}
--
Dave
Temping with Staffmark
in Rock Hill, SC


"Bernie Deitrick" wrote:

Dave,

You're welcome. Glad to hear that you got it to work...

Bernie
MS Excel MVP


All good and wonderful!

Thanks a million.
--