Excel Formula: Abbreviate Words or Names

In this tutorial, it provides some formulas to extract initial letters from each word in a cell as below screenshot shown. Also, it explains how the formulas work in Excel.
doc abbreviate words 1

In Office 365 and Excel 2019

The TEXTJOIN function is a new function available in Office 365 and Excel 2019 which can be used to extract all initial letters from each word.

Generic formula:

TEXTJOIN("",1,IF(ISNUMBER(MATCH(CODE(MID(text,ROW(INDIRECT("1:"&LEN(text))),1)),
ROW(INDIRECT("63:90")),0)),MID(text,ROW(INDIRECT("1:"&LEN(text))),1),""))

Arguments

Text: the text string you want to abbreviate.

How this formula work

Supposing you want to extract initials from cell A1, use this formula in cell B1.

=TEXTJOIN("",1,IF(ISNUMBER(MATCH(CODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1)),
ROW(INDIRECT("63:90")),0)),MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),""))

Press Shift + Ctrl + Enter key, and all initials of each word will be extracted.
doc abbreviate words 2

Explanation

1. The TEXTJOIN function is used to join text values with delimiter.

2. The MID, ROW, INDIRECT and LEN functions are used to convert the text string to an array or letters. Supposing

=MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1)

Press Shift + Ctrl + Enter

Returns an array of letters

A,p,p,l,e,P,i,e

And then this array is fed into CODE function, which outputs an array of numeric ascii codes, one code for each letter.

3. The ROW(INDIRECT("63:90") corresponds to the ascii codes for all capital letters A-Z.

4. The ISNUMBER, IF and MATCH functions are used to filter the results for final text joining.

Remarks:

1. If there are no capital letters in the text string, this formula returns blank.

2. This formula will extract all capital letters.
doc abbreviate words 3

In Office 2016 or previous versions

If you are in Excel 2016 or previous versions, you can use the TRIM function.

Generic formula:

TRIM(LEFT(Text,1)&MID(Text,FIND(" ",Text&" ")+1,1)&MID(Text,FIND("*",SUBSTITUTE(Text&" "," ","*",2))+1,1))

Arguments

Text: the text string you want to extract the first letters of each word.

How this formula work

Supposing you want to extract initials from cell A1, use this formula in cell B1.

=TRIM(LEFT(A1,1)&MID(A1,FIND(" ",A1&" ")+1,1)&MID(A1,FIND("*",SUBSTITUTE(A1&" "," ","*",2))+1,1))

Press Enter key, all first letters of each word in cell A1 is extracted.
doc abbreviate words 4

Explanation

1. The TRIM function removes all extra spaces in the text string.

2. The LEFT(A1,1) extracts the first letter of the text string.

3. MID(A1,FIND(" ",A1&" ")+1,1) extracts the first letter of the second word which is separated by space.

4. MID(A1,FIND("*",SUBSTITUTE(A1&" "," ","*",2))+1,1)) extracts the first letter of the third word which is separated by space.

Remarks:

1. This formula only works for three or less words in a cell.

2. You can change “ “ in the formula to other delimiters.

3. This formula extracts the first letters in case insensitive, if you want the formula always returns in upper case, add the UPPER function to the formula

=UPPER(TRIM(LEFT(A1,1)&MID(A1,FIND(" ",A1&" ")+1,1)&MID(A1,FIND("*",SUBSTITUTE(A1&" "," ","*",2))+1,1)))

Sample File

doc sampleClick to download sample file


Relative Formulas


The Best Office Productivity Tools

Kutools for Excel - Helps You To Stand Out From Crowd

Would you like to complete your daily work quickly and perfectly? Kutools for Excel brings 300 powerful advanced features (Combine workbooks, sum by color, split cell contents, convert date, and so on...) and save 80% time for you.

  • Designed for 1500 work scenarios, helps you solve 80% Excel problems.
  • Reduce thousands of keyboard and mouse clicks every day, relieve your tired eyes and hands.
  • Become an Excel expert in 3 minutes. No longer need to remember any painful formulas and VBA codes.
  • 30-day unlimited free trial. 60-day money back guarantee. Free upgrade and support for 2 years.
Ribbon of Excel (with Kutools for Excel installed)

Office Tab - Enable Tabbed Reading and Editing in Microsoft Office (include Excel)

  • One second to switch between dozens of open documents!
  • Reduce hundreds of mouse clicks for you every day, say goodbye to mouse hand.
  • Increases your productivity by 50% when viewing and editing multiple documents.
  • Brings Efficient Tabs to Office (include Excel), Just Like Chrome, Firefox, And New Internet Explorer.
Screen Shot of Excel (with Office Tab installed)
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.