Moving one long column into adjacent columns

**mugarolla** · 05-21-2010, 11:22 AM

Hi everyone.

I could use some help. I have about 600 rows of data in 4 columns. When printed, it prints on 6 pages. I would like a macro that could take the data from all the pages and put them on one page.

For example, my data is in columns A,B,C and D - Rows 1 to 600. I would like to take page 2 for instance, Columns A,B,C and D - Rows 101 to 200 and have them put on page 1 in columns E,F,G and H - Rows 1 to 100

Page 3, Columns A,B,C and D - Rows 201 to 300 would be moved to page 1 Columns I,J,K and L - Rows 1 to 100 and so on.

I could just cut and paste, but the tricky part is that the list is ever changing. If I added another entry, I would like it to be alphabetized and put in the correct Row with its corresponding data in the adjacent Columns.

If I manually add it to where it should be, it will throw off my page setup and not print correctly. So I need to keep the same number of Rows on the page and have everything shift 1 as I add an entry.

The other tough task is to have a cell where I could add the new data and have the macro put it where it needs to be, adjust all the other Rows to keep my page layout.

For instance,
A1 is Tom. B1 is 45. C1 is 63 and D1 is 92
A2 is Bob, B2 is 59, C2 is 95 and D2 is 108

Column A would be alphabetized, and only fitting 100 Rows on the page, I would not have A101, It would be E1 for the 101st entry and I1 for the 201st entry.

So if a new entry went to A4, that would mean that everything after is moved down (or over) 1 Row. A100 would become E1 because there are only 100 Rows on the page to print correctly and E100 would become I1 and so forth.

I can adjust the font and Column width to fit all the data on one page.

I know I am asking a lot, and if it is too much, just tell me to take and hike and I will understand.

Mug

**shg** · 05-21-2010, 07:21 PM

You may not need to take a hike, but you definitely need to post a workbook and explain exactly what you want in context, with before and after examples.

**mugarolla** · 05-22-2010, 11:41 AM

Thanks again for the reply.

The first workbook is my original list. The second book is how I want it to be, printing on the whole page, instead of just 4 columns on 6 pages. This way is only 2 pages and I use the whole sheet.

As I said earlier, I could just cut and paste, like I did to get the second workbook, but as I add entries, it will throw off the page setup unless I manually move everything around.

The third workbook is what will happen if I add two entries, the page setup is out of whack. I would manually have to adjust all the columns to get it to print right.

I was looking for some excel guru who could write a script or macro to do this in his sleep. If not, I have a lot of learning to do ahead of me. I've dabbled in Basic and Fortran back in the day, but have not wrote any kind of code in 20 years.

I know, some of you are asking yourself what Fortran is. It was the cutting edge programming language for engineers way back when. Am I showing my age?

Thanks
Mug