I have the following code which splits data from Column A so that
column B has last name(s) and column C has first names and middle
initial. How would I further code in excel to go only to Column C and
put everything from the space on into a new column. Once done, I would
want to delete all spaces and dashes in the worksheet and concatenate
Columns B, C, and G.
Smith,John A Smith John A
Jones,Henry Peter Jones Henry Peter
Jackson-Smith,Emily Marie Jackson-Smith Emily Marie
Martinez Diaz,Juan Martinez Diaz Juan
Davies,David Davies David
Sub ReverseAndSplit3()
Dim LastRow As Long
Application.DisplayAlerts = False
With Columns(1)
LastRow = .Cells(65536, 1).End(xlUp).Row
.TextToColumns Destination:=Range("B1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False,
_
Semicolon:=False, Comma:=True, Space:=False, Other:=False, FieldInfo _
:=Array(Array(1, 1), Array(2, 1))
End With
Application.DisplayAlerts = True
End Sub
Thanks for any and all help
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
