Merge 400 cells of data into one.

Hello,

I need to know how to combine the data in a column into a single cell, with the results being separated by a semi-colon and a space after the merging operation.

I have 400 cells worth of 4 digit data in each column.

Is there a macro that can help me do this?

For simplicity's sake let's say I just have one column that runs from A1:A400.

Thanks for your help!