ZURINET
asked on
Transform Horizontal data to vertical Column
Hi all
I have a need to re-arrange the data set.. see attached figure..
The data are arranged by Yearly Quartal..
i.e starting from 1901(4 data set); 1902 (4 data set) etc..
I am looking for a formular or a tutoiral that will help me
re-arrange them in columns i.e
Ist Quarter; Second Quarter; Third Quarter; Last Quarter; and Year
1.55946; 1.585132; 1.78814; 1.8174; 1901
etc..
Thanks your help will be appericated..
Regards
I have a need to re-arrange the data set.. see attached figure..
The data are arranged by Yearly Quartal..
i.e starting from 1901(4 data set); 1902 (4 data set) etc..
I am looking for a formular or a tutoiral that will help me
re-arrange them in columns i.e
Ist Quarter; Second Quarter; Third Quarter; Last Quarter; and Year
1.55946; 1.585132; 1.78814; 1.8174; 1901
etc..
Thanks your help will be appericated..
Regards
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Sub transform4()
For Each cel In Sheet1.Columns(1).Cells
If cel.Value = "" Then End
Sheet2.Cells(Int((cel.Row - 1) / 4) + 2, (cel.Row - 1) Mod 4 + 1) = cel.Value
Next cel
End Sub
The results would be on sheet2