Re-arrange data in one column into multiple columns

[AdamParker]

Hello all,
I have a problem...

I have many spreadsheets, each have 10000+ rows...
I would like them to be printer friendly...

The excel file has no headings... only data, and only one row..

example:

A
--
00001
00002
00003
00004
...
11234

I would like to have these values separated into many columns, (grouped by 52)...

so for example in column A I would have the first 52 rows, column B would contain the next 52, column C would contain the next 52... I know this is possible, the macro I tried to make grossly fails because of my loop ignorance, any help would be greatly appreciated. Thanks

[Leith Ross]

Hello AdamParker,

Here is a macro to create your columns in rows of 52.

Sub MakeIntoColumns()

  Dim C As Long
  Dim Col As Variant
  Dim LastRow As Long
  Dim StartRow As Long
  Dim R As Long
  Dim Rng As Range
  
    Col = "A"
    StartRow = 1
    LastRow = Cells(Rows.Count, Col).End(xlUp).Row
    LastRow = IIf(LastRow < StartRow, StartRow, LastRow)
    
      Application.ScreenUpdating = False
        For R = StartRow To LastRow Step 52
          C = C + 1
          Set Rng = Range(Cells(R, Col), Cells(R + 51, Col))
          Rng.Copy Destination:=Cells(StartRow, C)
          If C > 1 Then Rng.Clear
        Next R
      Application.ScreenUpdating = True
      
End Sub

Sincerely,
Leith Ross

[devil00132]

I have a large number of data in single column (A) such as name,address 1,address 2 and phone number, I just want to arrange these datas in four different column (A) (B) (C) AND (D), I want to keep names in column (A) address 1 in column (B) address 2 in column (C) and address in column (D), I can do cut paste function but that will consume much of my time so how can I arrange these datas by some easy functions or formula, I'm not that good in excel can any one help I'm using excel 2007.Below is the example
Column A
K Thapa
03542262278
Takdah Cantt
Darjeeling
D Sherpa
03542262263
6th mile
Kalimpong
.........
........
And so on

I want to arrange like this way
Column A Column B Column C Column D
K Thapa 03542262278 Takdah Cantt Darjeeling
D Sherpa 03542262263 6th mile Kalimpong


and so on so how can i do it
please help

[bibleguy125]

Check out the text to columns command under data, not sure exactly where it is in 2007. Don't know if that will do what you need or not. May have to do it multiple times; once delimited for spaces, once delimited for commas? Give it a shot.

[devil00132]

I tried text to column but its not working in my case.....