Flipping a name
Try this function.
Public Function FormatName(ByVal InputName As String) As String
FormatName = Right(InputName, Len(InputName) - InStrRev(Trim(InputName),
" ")) & _
", " & Trim(Left(InputName, InStrRev(InputName, " ")))
End Function
Jim Thomlinson
"Duncan_J" wrote:
If I got column of names
John Doe
And what to change it to
Doe, John
Is thier a way of doing this?
DJ
|