[Help]Code chèn vào dòng trống ngay bên dưới dòng có dữ liệu trong 1 vùng được chọn

[tuanna20992]

Như tiêu đề: các bác giúp em code làm thế nào để chèn vào dòng trống ngay bên dưới dòng có dữ liệu trong 1 vùng dữ liệu được chọn khi click vào các button, các bác sửa giúp em với hoặc xem hộ em code như thế nào hay biết bài nào có nội dung này thì chỉ em với (vùng dữ liệu là vùng đã được bôi vàng trong file đính kèm)

 

[giaiphap]

Như tiêu đề: các bác giúp em code làm thế nào để chèn vào dòng trống ngay bên dưới dòng có dữ liệu trong 1 vùng dữ liệu được chọn khi click vào các button, các bác sửa giúp em với hoặc xem hộ em code như thế nào hay biết bài nào có nội dung này thì chỉ em với (vùng dữ liệu là vùng đã được bôi vàng trong file đính kèm)

Tại sao lại nhiều button mà không phải là 1 button vậy bạn? Bạn giải thích rõ hơn ề sự khác nhau của các button.

 

[tuanna20992]

Tại sao lại nhiều button mà không phải là 1 button vậy bạn? Bạn giải thích rõ hơn ề sự khác nhau của các button.

Mỗi button là 1 user, do mình đang phải lọc hồ sơ nên nếu mà gõ tay từng user sẽ mất tg nên mình muốn khi kích vào nút có tên user nào thì nó sẽ đc chèn vào vùng đó

 

[giaiphap]

Mỗi button là 1 user, do mình đang phải lọc hồ sơ nên nếu mà gõ tay từng user sẽ mất tg nên mình muốn khi kích vào nút có tên user nào thì nó sẽ đc chèn vào vùng đó

Cũng chưa hiểu ý bạn lắm, hy vọng đúng ý bạn. Code chưa bẩy lỗi nhé.

 

[tuanna20992]

Cũng chưa hiểu ý bạn lắm, hy vọng đúng ý bạn. Code chưa bẩy lỗi nhé.

Thank bác, từ đoạn code bác cho em đã tìm được đoạn code mình muốn rồi

Sub InsUser()
    ActiveSheet.Range("D4").End(xlDown).Offset(1, 0).Select
    ActiveCell.Value = ActiveSheet.Buttons(Application.Caller).Characters.Text
End Sub