Move Column data to rows
 

Hi Sirs and Madams

I have a list of roughly a thousand numbers in one column, I would lik
to know how to take those numbers and put them into one row and column
with only a comma seperating them.

e.g.

17205
17206
17207
17216
17218
17219
17221
17225

-- 17205,17206,17207,17216,17218,17219,17221,17225

Thank you

Kind Regard

--
popp
-----------------------------------------------------------------------
poppy's Profile: http://www.excelforum.com/member.php...fo&userid=1145
View this thread: http://www.excelforum.com/showthread.php?threadid=49145

Move Column data to rows
 

This may get you started. Select the range of numbers before running this
and change the output cell from B1 to your cell.

Sub a()
Dim ValStr As String
Dim Cell As Range
For Each Cell In Selection
ValStr = ValStr & Cell.Value & ","
Next
ValStr = Left(ValStr, Len(ValStr) - 1)
Range("B1").Value = ValStr
End Sub


--
Jim
"poppy" wrote in
message ...
|
| Hi Sirs and Madams
|
| I have a list of roughly a thousand numbers in one column, I would like
| to know how to take those numbers and put them into one row and column
| with only a comma seperating them.
|
| e.g.
|
| 17205
| 17206
| 17207
| 17216
| 17218
| 17219
| 17221
| 17225
|
| -- 17205,17206,17207,17216,17218,17219,17221,17225
|
| Thank you
|
| Kind Regards
|
|
| --
| poppy
| ------------------------------------------------------------------------
| poppy's Profile:
http://www.excelforum.com/member.php...o&userid=11453
| View this thread: http://www.excelforum.com/showthread...hreadid=491450
|

Move Column data to rows
 

Hi Jim


Thank you very much

Kind Regard

--
popp
-----------------------------------------------------------------------
poppy's Profile: http://www.excelforum.com/member.php...fo&userid=1145
View this thread: http://www.excelforum.com/showthread.php?threadid=49145