VBA code to rearrange data into multiple columns

Hello there,

I have a worksheet with data arranged in descending order based on column A value. What I'm trying to do is to arrange the data into separate columns, as in the rows with the highest value in column A stay in the same place, rows with value -1 are cut and pasted to the first blank cell to the right and so on (sample workbook attached).

I understand that this requires some kind of loop. I'd be grateful for any help.

Please Login or Register  to view this content.

Thanks in advance for any suggestions.

Regards,
shinobi

Please Login or Register  to view this content.

?

Thanks yudlugar!

this is exactly what I was trying to do!