Excel: Get Last Word From Text String

< Back to Search results

 Category: [Excel]  Demo Available 

Excel: Get Last Word From Text String


Got any Excel/VBA Questions? Free Excel Help.

This UDF will extract the last word from a Text String.  

The Code

Function ReturnLastWord(The_Text As String)

Dim stGotIt As String


'Written by OzGrid Business Applications


'Extracts the LAST word from a text string


    stGotIt = StrReverse(The_Text)

    stGotIt = Left(stGotIt, InStr(1, stGotIt, " ", vbTextCompare))

    ReturnLastWord = StrReverse(Trim(stGotIt))

End Function

To use this UDF push Alt+F11 and go Insert>Module and paste in the code. Push Alt+Q and save. The Function will appear under "User Defined" in the Paste Function dialog box (Shift+F3). Use the Function as shown in the graphic example below. 


See also:

Automatically Run Excel Macros via Workbook & Worksheet Events
Excel: Password Protect/Unprotect All Excel Worksheets in One Go
Excluding Headings/Headers From the Current Region/Table
Excel: Get Text From Excel Cell Comments
Excel: Get Data From Closed Excel Workbooks


See also Index to Excel VBA Code and Index to Excel Freebies and Lesson 1 - Excel Fundamentals and Index to how to… providing a range of solutions.


Click here to visit our Free 24/7 Excel/VBA Help Forum where there are thousands of posts you can get information from, or you can join the Forum and post your own questions.


stars (0 Reviews)