If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
text column - via macro
Hi
Can someone write a macro for me to text column with the folloing eg in Column A, I have 4602101 - AAAAABBBBBBBCCCCCC so, I want macro to separate as put 4602101 in column A and the text in column B |
#2
|
|||
|
|||
text column - via macro
You can do this without macros, but try this:
Sub SplitUm() Dim r1 As Range, r2 As Range Set r1 = Intersect(ActiveSheet.UsedRange, Range("A:A")) cutt = " - " For Each r2 In r1 v = r2.Value r2.Value = Split(v, cutt)(0) r2.Offset(0, 1).Value = Split(v, cutt)(1) Next End Sub -- Gary''s Student - gsnu201003 "Rohit" wrote: Hi Can someone write a macro for me to text column with the folloing eg in Column A, I have 4602101 - AAAAABBBBBBBCCCCCC so, I want macro to separate as put 4602101 in column A and the text in column B |
Thread Tools | |
Display Modes | |
|
|