<div>
This will work for what I'm trying to do....THANKS!
</div>


This will work for what I'm trying to do....THANKS!

<div>
Were you looking for code?<br />

<pre><code id="code-20-36817096-1">Dim arrVals
Dim strVals

arrVals = Range(&quot;A1&quot;, Range(&quot;A&quot; &amp; Rows.Count).End(xlUp)).Value

strVals = Join(Application.Transpose(arrVals), &quot;&quot;)

Range(&quot;B1&quot;) = strVals</code></pre>
By the way I just noticed there might be an extra comma at the end.<br />
<br />
Do you want to keep that?
</div>


Were you looking for code?


Dim arrVals
Dim strVals

arrVals = Range("A1", Range("A" & Rows.Count).End(xlUp)).Value

strVals = Join(Application.Transpose(arrVals), "")

Range("B1") = strVals

By the way I just noticed there might be an extra comma at the end.

Do you want to keep that?

<div>
<div class="content wysiwyg-content">
Experts:<br />
<br />
My data in Excel 2010 looks like this in a single column:<br />
<br />
861.32,<br />
861.22,<br />
861.21,<br />
860.5,<br />
860.4,<br />
860.2,<br />
860.1,<br />
860.0,<br />
854.09,<br />
854.06,<br />
854.05,<br />
<br />
I need it to be transposed INTO a SINGEL CELL and have it look like this:<br />
<br />
861.32, 861.22, 861.21, 860.5, 860.4, 860.2, 860.1, 860.0, 854.09, 854.06, 854.05,<br />
<br />
There are about 1300 codes in the list...FYI....<br />
<br />
Thanks<br />

</div>
</div>


Experts:

My data in Excel 2010 looks like this in a single column:

861.32,
861.22,
861.21,
860.5,
860.4,
860.2,
860.1,
860.0,
854.09,
854.06,
854.05,

I need it to be transposed INTO a SINGEL CELL and have it look like this:

861.32, 861.22, 861.21, 860.5, 860.4, 860.2, 860.1, 860.0, 854.09, 854.06, 854.05,

There are about 1300 codes in the list...FYI....

Thanks


How to take contents from a COLUMN of data and place as an array in a SINGLE CELL?

Microsoft Excel topics include formulas, formatting, VBA macros and user-defined functions, and everything else related to the spreadsheet user interface, including error messages.