Excel does that with Text to Columns

Tyro

"JP" wrote in message
...
If all of the fields were separated by a single comma (i.e. "123 Main
St,Lenexa,KS,66215"), you could highlight your data and run this
macro. Keep in mind that this is not reversible.


Sub Delimit_By_Comma()
With Selection
.TextToColumns Destination:=Selection, DataType:=xlDelimited,
_
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False,
Tab:=True, _
Semicolon:=False, Comma:=True, Space:=False, Other:=False,
FieldInfo _
:=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1),
Array(5, 1), Array(6, 1), _
Array(7, 1), Array(8, 1))
End With
End Sub


HTH,
JP

On Jan 8, 2:57 pm, puddgyballerina
wrote:
I have imported a spreadsheet in which address1, address2, city, state and
zip are all in one cell. Is it possible to use a formula, formulas or
processes to relatively easily place the data into separate cells? It's
over
20,000 lines of data and we need it in separate columns to upload into our
sales database.