macro to transpose col A every 4 rows to Col B,C etc

[owensr]

Hey everyone im sort of in a pinch and need some help here.

I need a macro that will take all the data in a column no matter how long and put every 4th row in that column into a new column.

I've tried fooling around but im not that good with macros. They only way i can think to approach this is something like this....

Please Login or Register  to view this content.

then just go one forever.. but that would take longer than i would like.

Thanks in advance.

[VBA Noob]

Hello owensr,

Welcome to the forum.

Could I ask next time to
1) Provide a more searchable title. I've amended for you
2) Wrap your code. Again I've done for you (See link below for more)
3) Post to the correct forum. Moved from Functions to Programming.

See if the below helps. It copy's it first then clears col A

Please Login or Register  to view this content.

VBA Noob

[Richard Buttrey]

Hey everyone im sort of in a pinch and need some help here.

I need a macro that will take all the data in a column no matter how long and put every 4th row in that column into a new column.

I've tried fooling around but im not that good with macros. They only way i can think to approach this is something like this....

Please Login or Register  to view this content.

then just go one forever.. but that would take longer than i would like.

Thanks in advance.

Hi,
The following should work. You might want to put a test in to check that you've not got more than 1020 rows causing the macro to fall over when it tries to go past the 256th column IV.

Please Login or Register  to view this content.

Rgds

[owensr]

Hi,
The following should work. You might want to put a test in to check that you've not got more than 1020 rows causing the macro to fall over when it tries to go past the 256th column IV.

Please Login or Register  to view this content.

Rgds

Wow that works well. How would i alter this macro to include the three rows under the one thats being copied into the corresponding column. say every 4 rows as in rows 1-4 5-8, ect... Sorry for the confusion question.

[Richard Buttrey]

Wow that works well. How would i alter this macro to include the three rows under the one thats being copied into the corresponding column. say every 4 rows as in rows 1-4 5-8, ect... Sorry for the confusion question.

Hi,

Just change it to the following:

Please Login or Register  to view this content.

Rgds