Combine text strings from column A

[wnoland]

I'd like to be able to take a columnA list of email addresses and combine them into one cell, separated by commas, so I can paste values out of to drop into IM----instead of using a clunky:

=CONCATENATE(A1, ", ",A2, ", ",A3, ", ",A4, ", ",A5)

Anything come to mind that I can drag down the entire column?

 

[circledchicken]

Hi and welcome,

You could use the slightly less clunky format:

=A1&","&A2&","&A3 ....

Or you could write a UDF to do it for you:

• Press Alt -> F11 to open the VBA editor
• Click Insert -> Module
• Paste the code below in the white space

Function econcat(oRng As Range) As String
    econcat = Join(Application.Transpose(oRng), ",")
End Function

• Then use it in a cell as shown in the example below, changing A3 to the last cell you want:
  =econcat(A1:A3)

 

[wnoland]

Thank you. Need to get better at VBA and writing my own functions. This is great.

 

[circledchicken]

Your welcome, thanks for the feedback.