Mỗi lần Click là xuống dòng kế tiếp (1 người xem)

[toandiennuoc123]

Chào các bạn, mình muốn tạo 1 ComboBox mà mỗi lần Click trong list thì dữ liệu lại xuống dòng kế tiếp (Linkcell nó chỉ cho 1 ô thôi)Cám ơn các bạn

 

[nghiaphuc]

Chào các bạn, mình muốn tạo 1 ComboBox mà mỗi lần Click trong list thì dữ liệu lại xuống dòng kế tiếp (Linkcell nó chỉ cho 1 ô thôi)Cám ơn các bạn

Nhấn Alt+F11, double click vào Sheet1 (ở ngăn bên trái) và dán đoạn code này vào khung soạn thảo:

Private Sub ComboBox1_Change()
    [M65536].End(xlUp).Offset(1) = ComboBox1
End Sub

 

[ndu96081631]

Nhấn Alt+F11, double click vào Sheet1 (ở ngăn bên trái) và dán đoạn code này vào khung soạn thảo:

Private Sub ComboBox1_Change()
    [M65536].End(xlUp).Offset(1) = ComboBox1
End Sub

Nếu là code như trên thì mình có thể giải quyết bằng công thức đấy!
- Đặt name

Link =INDIRECT("M"&IF(COUNTA($M$1:$M$1000),MATCH(REPT("z",255),$M$1:$M$1000)+1,2))

- Đặt LinkedCell Property = Link
Xong!
Ẹc... Ẹc...

 

[toandiennuoc123]

Nhấn Alt+F11, double click vào Sheet1 (ở ngăn bên trái) và dán đoạn code này vào khung soạn thảo:

Private Sub ComboBox1_Change()
    [M65536].End(xlUp).Offset(1) = ComboBox1
End Sub

Chào bạn nghiaphuc đến bây giờ nó mới phát sinh vấn đề : Nếu dữ liệu trùng thì nó không xuống dòng kế tiếp, bạn xem file đính kèm. Cám ơn bạn rất nhiều.