Hi Carim,
How can I make use of your program code in excel. I am not too familiar with
the VB editor. Do I need to program this as a macro?
Please advise.
Thanks.


"Carim" wrote:

Hi,

To invert copy ...

Sub InvertCopy()
Dim i As Integer
Dim j As Integer
j = Cells(Cells.Rows.Count, "A").End(xlUp).Row
For i = 1 To j
Cells(i, 1).Copy Cells(j - i + 1, 2)
Next i
End Sub

HTH