Copy and paste to the last row
hi
if i understand correctly, this should work for you....
Sub movedownone()
Dim r As Range
Set r = Range("A65000").End(xlUp)
r.Resize(1, 3).Copy Destination:= _
r.Offset(1, 0)
End Sub
regards
FSt1
"tran1728" wrote:
Dear ALL, pls help me for macro.
I want copy the last row of column A, B and C.
and Paste the row down.
Example, my last row of A is A120, copy cell A120:C120.
then Past to A121
Thanks so much
|