Reorganizing table data

[mrpolyglot]

Hello,

Try as I might, I cannot perform the following task.

I have a 3-column table with 5 rows of data:

Column A, Column B, Column C
2, 14, 29
7, 8, 16
3, 34, 27
18, 1, 5
1, 19, 4

I need to reorder the above data such that the data would appear in Column D and Column E as follows:

Column D, Column E
2, 14
7, 8
3, 34
18, 1
1, 19
14, 29
8, 16
34, 27
1, 5
19, 4

Your help is greatly appreciated. Thank you in advance.

 

[venkat1926]

data is like this

Excel Workbook
	A	B	C
1	hdng1	hdng2	hdng3
2	2	14	29
3	7	8	16
4	3	34	27
5	18	1	5
6	1	19	4
Sheet1

try this macro test

Sub test()
Dim r As Range, c As Range, k As Integer
Application.ScreenUpdating = False
Worksheets("sheet2").Cells.Clear
With Worksheets("sheet1")
k = 0
Set r = Range(.Range("A2"), .Range("A2").End(xlDown))
Do
For Each c In r
Set c = c.Offset(0, k)
Range(c, c.Offset(0, 1)).Copy
With Worksheets("sheet2")
.Cells(Rows.Count, "A").End(xlUp).Offset(1, 0).PasteSpecial
End With
Next c
k = k + 1
If k > 1 Then Exit Do
Loop
End With
Application.CutCopyMode = False
Application.ScreenUpdating = True
MsgBox "macro over"
End Sub