B1: =MID(A1,FIND(",",A1)+1,FIND(" ",A1)-FIND(",",A1)-1)
C1: =MID(A1,FIND(" ",A1)+1,99)
D1: =LEFT(A1,FIND(",",A1)-1)

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"gh" <gh@at.net> wrote in message
news:O%234wm6ixGHA.4256@TK2MSFTNGP06.phx.gbl...
> I have a worksheet with the full name in one of the columns. Below is
> an example. I would like to add a . after the middle initial then copy
> the firstname, lastname and middle initial to seperate columns. Is ther
> a function for this?
>
> TIA
>
> A B C D
> LastName,John Q. John Q. LastName