VBA for comma delimited

[Closed]
Report
-
I have a column of numbers. I want to transpose the column to row but have all numbers in one cell separated by a comma. What is a good VBA to use.

e.g. column A
122345
12367
98698530

Transpose to row A1 122345,12367,98698530