Macro to split one column into multiple column?

I have one column of 1400 rows. I want to write a macro to divide this column in to multiple columns, each consisting 42 rows.
How can I do so? Please Help.

maybe something like this

Please Login or Register  to view this content.