Microsoft Office Forums

Go Back   Microsoft Office Forums > >

 
 
Thread Tools Display Modes
Prev Previous Post   Next Post Next
  #1  
Old 12-22-2023, 10:58 AM
RobiNew RobiNew is offline Getting the last of three names/words Windows 10 Getting the last of three names/words Office 2016
Competent Performer
Getting the last of three names/words
 
Join Date: Sep 2023
Posts: 200
RobiNew is on a distinguished road
Default Getting the last of three names/words


I'm trying to get the last name in the first paragraph of a doc, but the code here below fails. The string is of this type: John R. Mate or John Rob Mate. Can someone help? Thanks!
Code:
Sub LastName()
Set oRng = ActiveDocument.Range
oRng.Collapse
oRng.MoveEndUntil Cset:=Chr(13)
oRng.Collapse wdCollapseEnd
oRng.Previous(Unit:=wdWord, Count:=1).Select
oRng.Select
'MsgBox oRng.Text
Sub End
Reply With Quote
 



Similar Threads
Thread Thread Starter Forum Replies Last Post
Foreign words/names Read Aloud HanselM Word 1 05-01-2023 09:36 AM
Getting the last of three names/words Removing microsoft build-in style names - display of style names in styles gallery changed Firebody Word 8 03-06-2022 08:22 AM
How to find (highlight) two and more words in a list of 75k single words in Word 2010 Usora Word 8 05-29-2018 03:34 AM
Need to extract domain names containing only specific words (MAJOR BULK) Maxwell314 Excel 4 12-08-2014 05:10 PM
How to enter names in Resource Pool/names pstein Project 1 03-26-2012 07:37 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 11:04 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft