View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Nigel Nigel is offline
external usenet poster
 
Posts: 923
Default How can I do this with VBA?

Assume name is in cell A1 then .........

xname = Trim(Range("A1"))

MsgBox Left(xname, InStr(1, xname, " ")) & Right(xname, InStrRev(xname, "
") - 2)

This assumes there is at least one space between the salutation, first and
last name. If the name is formatted without a space after the salutation,
e.g.
Mr.Jack Adams, then use..........

MsgBox Left(xname, InStr(1, xname, ".")) & Right(xname, InStrRev(xname, "
") - 1)


--
Cheers
Nigel



"slamm" wrote in
message ...

For instance, I have " Mr. Jack Adam" and I want to trim the first name
and have "Mr. Adam" left.

How can I do that?


Thanks a lot.



slamm


--
slamm
------------------------------------------------------------------------
slamm's Profile:

http://www.excelforum.com/member.php...o&userid=15018
View this thread: http://www.excelforum.com/showthread...hreadid=483829