Extract text from a text string

[pigster]

I need to extract text in a single cell that is seperated by commas and place the text in there own seperate cell. Example below:

129 High street, billericay, essex, cm12 9ah

does anyone have a formular as i have hundreds of addresses like this.

Many thanks

 

[JugglerJAF]

Select the cells, then use Data>Text to Columns and specify the comma as the delimiter.

 

[VoG]

Select the data, Data > Text to Columns, select Delimited and specify comma as the delimiter.

 

[machopicho]

Try:

Sub m()
strg = Split([A1], ",")
For i = LBound(strg) To UBound(strg)
Cells(2, i) = strg(i)
Next
End Sub

 

[pigster]

Used the delimiter, excellant and many thanks