String separated with commas
 

I have a string looking like:

aaa, bbb, ccc, ddd, eee.....

I want to load an array with these elements - like:

Array(aaa,bbb,ccc,ddd,eee.........).

The elements is separated with comma and space in string.

What is the best way to do this?

String separated with commas
 

Sub dural()
s = "a, b, c, d, e"
s2 = Split(Replace(s, " ", ""), ",")
End Sub

Here s2 is an array. s2(0) will contain "a", etc.
--
Gary''s Student - gsnu200770


"Jarle" wrote:

I have a string looking like:

aaa, bbb, ccc, ddd, eee.....

I want to load an array with these elements - like:

Array(aaa,bbb,ccc,ddd,eee.........).

The elements is separated with comma and space in string.

What is the best way to do this?

String separated with commas
 

Fantastic - even more elegant that could ever imagine.
Thank you!

Gary''s Student skrev:

Sub dural()
s = "a, b, c, d, e"
s2 = Split(Replace(s, " ", ""), ",")
End Sub

Here s2 is an array. s2(0) will contain "a", etc.
--
Gary''s Student - gsnu200770


"Jarle" wrote:

I have a string looking like:

aaa, bbb, ccc, ddd, eee.....

I want to load an array with these elements - like:

Array(aaa,bbb,ccc,ddd,eee.........).

The elements is separated with comma and space in string.

What is the best way to do this?

String separated with commas
 

You are very welcome. Split is nice because it creates an array without a DIM.


Join() is the opposite.
--
Gary''s Student - gsnu200770


"Jarle" wrote:

Fantastic - even more elegant that could ever imagine.
Thank you!

Gary''s Student skrev:

Sub dural()
s = "a, b, c, d, e"
s2 = Split(Replace(s, " ", ""), ",")
End Sub

Here s2 is an array. s2(0) will contain "a", etc.
--
Gary''s Student - gsnu200770


"Jarle" wrote:

I have a string looking like:

aaa, bbb, ccc, ddd, eee.....

I want to load an array with these elements - like:

Array(aaa,bbb,ccc,ddd,eee.........).

The elements is separated with comma and space in string.

What is the best way to do this?

String separated with commas
 

Sub dural()
s = "a, b, c, d, e"
s2 = Split(Replace(s, " ", ""), ",")
End Sub

You do not have to use the replace function to pare down the delimiter to a
single character like that... the delimiter can contain multiple
characters...

s2 = Split(s, ", ")

where the characters between the quote marks are a comma followed by a
space. Now, with that said, doing what you posted will protect against a
improperly formed string of text where the number of spaces following the
comma are not consistent throughout the text.

Rick

String separated with commas
 

Hi Rick:

Thanks for the tip about being able to use more than one character as a
separator.
--
Gary''s Student - gsnu200770


"Rick Rothstein (MVP - VB)" wrote:

Sub dural()
s = "a, b, c, d, e"
s2 = Split(Replace(s, " ", ""), ",")
End Sub

You do not have to use the replace function to pare down the delimiter to a
single character like that... the delimiter can contain multiple
characters...

s2 = Split(s, ", ")

where the characters between the quote marks are a comma followed by a
space. Now, with that said, doing what you posted will protect against a
improperly formed string of text where the number of spaces following the
comma are not consistent throughout the text.

Rick