Find all initials in Full Name...?

=LEFT(A1,1)&IFERROR(" "&LEFT(RIGHT(A1,LEN(A1)-FIND(" ",A1,1)),1),"")&IFERROR(" "&LEFT(RIGHT(RIGHT(A1,LEN(A1)-FIND(" ",A1,1)),LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,1)))-FIND(" ",RIGHT(A1,LEN(A1)-FIND(" ",A1,1)))),1),"")&IFERROR(" "&LEFT(RIGHT(RIGHT(RIGHT(A1,LEN(A1)-FIND(" ",A1,1)),LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,1)))-FIND(" ",RIGHT(A1,LEN(A1)-FIND(" ",A1,1)))),LEN(RIGHT(RIGHT(A1,LEN(A1)-FIND(" ",A1,1)),LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,1)))-FIND(" ",RIGHT(A1,LEN(A1)-FIND(" ",A1,1)))))-FIND(" ",RIGHT(RIGHT(A1,LEN(A1)-FIND(" ",A1,1)),LEN(RIGHT(A1,LEN(A1)-FIND(" ",A1,1)))-FIND(" ",RIGHT(A1,LEN(A1)-FIND(" ",A1,1)))))),1),"")

Extremely messy I know but this will work out up to 4 initials. It finds modifies the text by removing the left most name each time hence the length of the formula.

EDIT: Wrap this in UPPER to ensure result is in capitals (if you need this to be the case):

=UPPER("above formula")