Macro - Moving Rows into columns

[quaser15]

I have attached my problem, It could be fruitful if any one can solve it. I will appreciate it.

http://imthiyaz.weebly.com/query.html

File name: imthiyaz.xls

In this problem I need Column A2 Joints With Column A8, subsequently i have data which is listed until A30000 lines, I need the macro code, which can do this job easily.

Thanks!

 

[Peter_SSs]

.. later i come to know that i want to merge A1 and A7 ..

Cells(r, 2).Value = Cells(r, 1).Value & " " & Cells(r + 6, 1).Value
which yielded good result.

Now for another experiment, i want a code, where the data in A7 comes first followed by the data in A1 merges together in B. Post#9 merges the data which contains A1 first followed by A7 in B, now i want vice versa.

Hope you got idea.

Yes, I've got the idea, but surely you could swap the order yourself since you know exactly what line joins the 2 cells and also how to change which cell is referred to.