Thanks, that did it,
and I have learned from the other replies.

thanks and regards

"Rick Rothstein (MVP - VB)" wrote:

One way:

=IF(ISERROR(FIND(" ",A1)),A1,(LEFT(A1,FIND(" ",A1)-1)))

You can eliminate the need for the error check and simply the expression by
making sure FIND always has a space to find...

=LEFT(A1&" ",FIND(" ",A1&" ")-1)

Rick