Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
I would like to have the data that is in one cell parsed into two cells like
in the example below. The data is always separated by a consecutive whole number in parenthesis . Thank you A (1.) White Dog (2.) Black Cat A B White Dog Black Cat |
#2
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Sub SplitCellswith()
For Each n In Range("h2:h6") c = Application.Substitute(n, " ", "") p1 = InStr(1, Trim(c), ")") p2 = InStr(p1 + 1, c, ")") + 1 p3 = InStr(p1 + 1, c, "(") - 1 n.Offset(, 1) = Mid(c, p2, 256) n.Offset(, 0) = Mid(c, p1 + 1, p3 - p1) Next n End Sub -- Don Guillett Microsoft MVP Excel SalesAid Software "ferde" wrote in message ... I would like to have the data that is in one cell parsed into two cells like in the example below. The data is always separated by a consecutive whole number in parenthesis . Thank you A (1.) White Dog (2.) Black Cat A B White Dog Black Cat |
#3
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Thank you for the help
"Don Guillett" wrote: Sub SplitCellswith() For Each n In Range("h2:h6") c = Application.Substitute(n, " ", "") p1 = InStr(1, Trim(c), ")") p2 = InStr(p1 + 1, c, ")") + 1 p3 = InStr(p1 + 1, c, "(") - 1 n.Offset(, 1) = Mid(c, p2, 256) n.Offset(, 0) = Mid(c, p1 + 1, p3 - p1) Next n End Sub -- Don Guillett Microsoft MVP Excel SalesAid Software "ferde" wrote in message ... I would like to have the data that is in one cell parsed into two cells like in the example below. The data is always separated by a consecutive whole number in parenthesis . Thank you A (1.) White Dog (2.) Black Cat A B White Dog Black Cat . |
#4
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
On Thu, 3 Jun 2010 14:46:26 -0700, ferde
wrote: I would like to have the data that is in one cell parsed into two cells like in the example below. The data is always separated by a consecutive whole number in parenthesis . Thank you A (1.) White Dog (2.) Black Cat A B White Dog Black Cat B1: =TRIM(MID(A1,FIND(")",A1)+1,FIND("(",A1,FIND("(",A 1)+1)-FIND(")",A1)-1)) C1: =TRIM(MID(A1,FIND(")",A1,FIND(")",A1)+1)+1,255)) |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
text string separated by comma | Excel Discussion (Misc queries) | |||
Extracting text separated by | from string? | Excel Discussion (Misc queries) | |||
Excel 2003 - A string of #s needs to be separated into individual | Excel Discussion (Misc queries) | |||
MSExcel--words in a cell separated by comma need to be moved into. | Excel Worksheet Functions | |||
Divide one row over other row I dont wont to divide one number | Excel Discussion (Misc queries) |