Hi, can someone please tell what i did wrong, this is my first macro all by
myself, but it gives me a error, i made a macro where i what to copy sheet
"teste" to sheet "destino" but without range, so that when i introduce new
values to column A,B,C and execute the macro it copys all values to destino,
but it only copys last cell of A :S!can someone see what´s wrong with my
code?1000 thanks!

Sub Datacopy()

    Worksheets("teste").Cells(Rows.Count, "A").End(xlUp).Copy

    With Worksheets("destino")
      .Cells(Rows.Count, "A").End(xlUp).Offset(1, 0).PasteSpecial
Paste:=xlPasteValues
    End With

End Sub

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel

Attachment: copy.xlsm
Description: Binary data

Reply via email to