Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
ExcelHelp said:Split the contents of cells across multiple cells
You cannot split a cell or range (range: Two or more cells on a sheet. The cells in a range can be adjacent or nonadjacent.) of cells that was not previously merged. You can, however, divide the contents of unmerged cells and display them across other cells.
Select the cell, the range of cells, or the entire column that contains the text values that you want to divide across other cells. A range can be any number of rows tall, but no more than one column wide.
Important Unless there are one or more blank columns to the right of the selected column, the data to the right of the selected column will be overwritten.
On the Data menu, click Text to Columns.
Follow the instructions in the Convert Text to Columns Wizard to specify how you want to divide the text into columns.
Note For help with completing all the steps of the wizard, click Help in the Convert to Text Columns Wizard.
Private Sub SplitItOut()
Dim strValue() As String
Dim r as Long 'Row
Dim c as Long 'Column
Dim x as Long 'For counting up rows columns in same row
Dim a as Integer 'For counting up in the array
r = ActiveCell.Row
c = ActiveCell.Column
strValue = Split(Range(r,c,), ",")
x = c + 1
a = 0
For x = c + 1 To UBound(strValue) + 2
Range(r,x).Value = strValue(a)
a = a + 1
Next x
End Sub
You are up a creek I'm afraid - if there is no logic that can determine what the seperator is or how many seperators there are, it will be a long hard manual slogcomes with many variations as far as delimiters