Creating an email list

  • Thread starter Thread starter ILunacy
  • Start date Start date
I

ILunacy

I have a column of email addresses, and I want to combine them all into one
cell seperated by commas. I want to make an group email list that I can just
copy into an email without having to enter each individual emaill address.
 
Say your email list is in column C starting in C1. In D1 enter "=C1"
without the quotes. In D2 enter =D1&","&C2. Drag this formula down as far
as your email list goes. The last cell will show all the emails. HTH Otto
 
Hopefully not for all the 500 mentioned in another thread... ;-)
Again..., Assuming your E-Mail list resides in range A1:A10:
Press ALT+[F11] > declare a Module (if doesn't exist) and type the following
UDF:
--------------------------------------------------------
Function Concat(Rng As Range, Delimiter As String)
For Each ST In Rng
If ST <> "" Then S = S & ST & Delimiter
Next
Concat = Left(S, Len(S) - Len(Delimiter))
End Function
 
Back
Top