Copy and paste to the last row

  • Thread starter Thread starter tran1728
  • Start date Start date
T

tran1728

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
 
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
 
Yes , exactely that i want, thanks so much.

FSt1 said:
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
Click to expand...
 
tran1728;952064 said:
Yes , exactely that i want, thanks so much.

:
-
Click to expand...

excel is very flexible tool, you can record a macro manually and excute
it (play with it)

all the best
 
Back
Top