Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Flipping a name
If I got column of names
John Doe And what to change it to Doe, John Is thier a way of doing this? DJ |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Flipping a name
Try something like
Dim S As String Dim Pos As Integer S = Range("A1").Text Pos = InStr(1, S, " ") S = Mid(S, Pos + 1) & ", " & Left(S, Pos - 1) Range("A1").Value = S -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Duncan_J" wrote in message ... If I got column of names John Doe And what to change it to Doe, John Is thier a way of doing this? DJ |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Flipping a name
Thanks Jim but couldn't get the function to work...
Thanks Trent. it works for the first one but it won't go to the next one and the whole coulmn "Duncan_J" wrote: If I got column of names John Doe And what to change it to Doe, John Is thier a way of doing this? DJ |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Flipping a name
Thanks Guys I got'em to work... Thanks for the help
"Duncan_J" wrote: If I got column of names John Doe And what to change it to Doe, John Is thier a way of doing this? DJ |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Flipping a name
Duncan, I forgot to add that it is selection dependent (i.e., the user must
manually select the range before executing the procedure). Otherwise, you (the developer) has to give the procedure a way to terminate. E.g., ActiveCell.SpecialCells(xlLastCell).Row returns the last row's index of the ActiveSheet. Thus: Dim lngCurrentRow as Long Range("<RangeID").Select 'E.g. Range("A1").Select Do lngCurrentRow = lngCurrentRow + 1 ActiveCell.Value = FormatName(ActiveCell.Value) 'This is from Jim Thomlinson's solution ActiveCell.Offset(1,0).Select 'This increments the cursor Loop until lngCurrentRow = ActiveCell.SpecialCells(xlLastCell).Row -- Trent Argante "Duncan_J" wrote: Thanks Jim but couldn't get the function to work... Thanks Trent. it works for the first one but it won't go to the next one and the whole coulmn "Duncan_J" wrote: If I got column of names John Doe And what to change it to Doe, John Is thier a way of doing this? DJ |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Flipping text | Excel Worksheet Functions | |||
Flipping a Spreadsheet | Excel Worksheet Functions | |||
flipping a spreadsheet | Excel Worksheet Functions | |||
Flipping a name | Excel Programming | |||
Flipping a name | Excel Programming |