nối data sao cho liên tục

[minhbinhdinh]

thanks,
nhờ mọi người giúp cho : ý tưởng
khi chọn 1 cell rồi chọn " mới " trong userform thì đưa data đó qua sheet2, data chọn sau nối theo data trước.
sẵn đây nhờ mọi người luôn :
- trong fỉle có 2 macro mình muốn khi chạy thử thì chạy luôn macro xuly chứ không yêu cầu chọn

 

[cadafi]

thanks,
nhờ mọi người giúp cho : ý tưởng
khi chọn 1 cell rồi chọn " mới " trong userform thì đưa data đó qua sheet2, data chọn sau nối theo data trước.

Code của bạn đây:
[highlight=VB]
Sub Moi()
ActiveCell.Resize(1, 2).Copy Sheet2.Range("A" & Sheet2.[A65536].End(xlUp).Row + 1)
Application.CutCopyMode = False
End Sub
[/highlight]

-------------------------------------------------------------------------------------------

- trong fỉle có 2 macro mình muốn khi chạy thử thì chạy luôn macro xuly chứ không yêu cầu chọn

Xem file đính kèm nhé! Ấn Ctrl+Shift+R để chạy code nhé bạn!

 

[minhbinhdinh]

cảm ơn cadafi

nhưng mình muốn chạy cái userform ra để muốn chọn data nào cần chuyển thì mình chuyển

 

[cadafi]

nhưng mình muốn chạy cái userform ra để muốn chọn data nào cần chuyển thì mình chuyển

Bạn chỉ cần click chuột chọn data (cột B bên sheet1) sau đó Ctrl+Shift+R là chuyển qua thôi mà! Hay mình chưa hiểu ý bạn nhỉ?

 

[ndu96081631]

thanks,
nhờ mọi người giúp cho : ý tưởng
khi chọn 1 cell rồi chọn " mới " trong userform thì đưa data đó qua sheet2, data chọn sau nối theo data trước.
sẵn đây nhờ mọi người luôn :
- trong fỉle có 2 macro mình muốn khi chạy thử thì chạy luôn macro xuly chứ không yêu cầu chọn

Hình như bạn đã gữi 1 bài tương tự tại đây:
http://www.giaiphapexcel.com/forum/showthread.php?t=27226
Có điều bây giờ bạn yêu cầu copy sang theo kiểu nối đuôi ---> Tôi nghĩ cũng chẳng cần đến UserForm ---> Chỉnh lại code củ 1 tí là xong!
Nếu đồng ý, chúng ta sẽ tiếp tục!

 

[minhbinhdinh]

Hình như bạn đã gữi 1 bài tương tự tại đây:
http://www.giaiphapexcel.com/forum/showthread.php?t=27226
Có điều bây giờ bạn yêu cầu copy sang theo kiểu nối đuôi ---> Tôi nghĩ cũng chẳng cần đến UserForm ---> Chỉnh lại code củ 1 tí là xong!
Nếu đồng ý, chúng ta sẽ tiếp tục!

thanks bạn rất nhiều
ý của mình là như sau: (mình ql số điện thoại)
sheet1 : lưu data về khách hàng(số đt,địa chỉ ....)
sheet2 : lưu khách hàng mới
sheet3 : lưu khách hàng không sd dịch vụ của mình nữa
- trong ngày làm thì có biến động tăng/giảm khách hàng nên mình muốn sd userform để giao diện không bị mở rộng ra quá

 

[minhbinhdinh]

Bạn chỉ cần click chuột chọn data (cột B bên sheet1) sau đó Ctrl+Shift+R là chuyển qua thôi mà! Hay mình chưa hiểu ý bạn nhỉ?

sao mình làm ở sheet2 qua tới 2 dòng giống nhau vậy