You can do this without a macro:
If addresses start in A1 then in B1 put
=A1
In B2 put
=B1&A2
Copy the formula in B2 down to the bottom of your data.
If you only want the last cell contents, copy it and do paste special,
values only. Now delete the other B column entries.

I have an excel sheet that takes a range of names and email addresses
and converts it into an outlook contacts folder (which you can name).
Email me directly if you would like a copy.
regards
Paul

On May 8, 9:18*am, Aidan wrote:
Hi

I have a column with about 40 email addresses one below the other (i cell
for each address). I would like to run a macro on the range so that all the
addresses are combined in the one cell prefereably in the adjacent column.
There is a semicolon at end of each address so I dont have to worry about the
data ending up in one cell. Any help appreciated on this.

Thanks, Aidan.