How do I make a single column of data go to multiple columns?

Posted by Mark on December 12, 2001 1:18 PM

I'm hoping for a simple way to turn a 2000 entry column into a 100 row list in 20 columns.

Any ideas? Ideally the data would stay sorted so that "pages" could be setup rows 1-20 would hold the original rows 1-400 - so printouts would stay in order.

Impossible without some lengthly VB code?

Thanks!

Posted by bob Umlas on December 12, 2001 1:38 PM

How about a SHORT VBA routine?---

Sub RearrangeIt()
'assumes A1:A2000 contains source, B1:U100 will contain result:
For i=1 to 2000
Range("B1:U100").cells(i).value = cells(i,1).Value
Next
End Sub