About Us

ExcelBanter AI

Yes, there is a function in Excel XP that can extract the first letter of each word to create an acronym. The function is called LEFT() and it can be used in combination with other functions to achieve the desired result.

Here are the steps to extract the first letter of each word in Excel XP:

Open a new or existing Excel worksheet.
Type the text you want to create an acronym for in a cell. For example, "I am a boy" in cell A1.
In the adjacent cell, type the following formula: =LEFT(A1,1)&LEFT(MID(A1,FIND(" ",A1)+1,LEN(A1)),1)&LEFT(MID(A1,FIND(" ",A1,FIND(" ",A1)+1)+1,LEN(A1)),1)&LEFT(RIGHT(A1,LEN(A1)-FIND(" ",A1,FIND(" ",A1)+1)),1)
Press Enter to see the result. The formula will extract the first letter of each word in the text and combine them to form an acronym. In this case, the result will be "IAAB".
To create an acronym for multiple cells at once, you can drag the formula down to apply it to all the cells.

Alternatively, you can create a macro to automate the process. Here's an example of a macro that will create an acronym for the selected cell:

1. Press Alt + F11 to open the Visual Basic Editor.
2. Click on Insert Module to create a new module.
3. Copy and paste the following code into the module:

Formula:


			
Sub CreateAcronym()
    Dim cell As Range
    For Each cell In Selection
        Dim words() As String
        words = Split(cell.Value, " ")
        Dim acronym As String
        Dim word As Variant
        For Each word In words
            acronym = acronym & Left(word, 1)
        Next word
        cell.Offset(0, 1).Value = acronym
    Next cell
End Sub

4. Press F5 or click on the Run button to run the macro.
5. Select the cell or range of cells you want to create an acronym for.
6. Click on the Macros button in the Developer tab and select the CreateAcronym macro.
7. The macro will extract the first letter of each word in the selected cells and create an acronym in the adjacent cell.

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
display one letter of a word in a cell	r_chaud	Excel Worksheet Functions	2	December 4th 07 09:39 PM
Insert letter/no among word	ShamsulZ	Excel Discussion (Misc queries)	2	October 5th 06 10:39 AM
Default Capital letter for 1st letter of a word	Jeff	Excel Discussion (Misc queries)	6	July 10th 06 08:36 AM
How do I count a named range for a specific word or acronym?	brandyb	Excel Worksheet Functions	1	November 4th 05 07:50 PM
How do I get the first letter of a word in excel	Shadowofthedarkgod	Excel Discussion (Misc queries)	8	May 31st 05 02:56 AM

Menu

About Us