copy , paste ở sau ô cuối cùng (1 người xem)

[phan_huythai]

anh chị tạo giúp em sub mình chọn ô "B2" nó copy để vào sau cái ô cuối cùng nhất ở cột "E".
Em cám ơn nhiều.!

 

[leonguyenz]

anh chị tạo giúp em sub mình chọn ô "B2" nó copy để vào sau cái ô cuối cùng nhất ở cột "E".
Em cám ơn nhiều.!

[gpecode=vb]
Sub Button1_Click()
Range("E" & Range("E65535").End(xlUp).Row + 1) = Range("B2")
End Sub
[/gpecode]