Giải quyết giúp em cái combobox

[THIENVI1503]

Em có file ví dụ kèm theo. Trong đó có sử dụng chức năng combobox nhưng em bó tay với yêu cầu này. Các bác xem giúp em với.

 

[volga]

Em có file ví dụ kèm theo. Trong đó có sử dụng chức năng combobox nhưng em bó tay với yêu cầu này. Các bác xem giúp em với.

Bài này Anh Ndu trả lời ở đây nè bạn !
Thân
Khác biệt là bạn phải chọn vị trí cho dử liệu trước ,sau đó mới chọn trọn combo.
Bạn thử chọn A17 rồi lên chọn trên combo xem thế nào ?

 

[THIENVI1503]

Cảm ơn volga, nhưng bài của ndu trả lởi chỉ cho ra 1 cell thui. Cái mình cần là nhiều cell liên tục. Volga giúp mình xem thế nào nha? Thanks

 

[hoangdanh282vn]

Cảm ơn volga, nhưng bài của ndu trả lởi chỉ cho ra 1 cell thui. Cái mình cần là nhiều cell liên tục. Volga giúp mình xem thế nào nha? Thanks

Sau khi chọn xong, bấm doubleclick nha :

Private Sub ComboBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
With ComboBox1
[B65536].End(xlUp).Offset(1) = .Value
[B65536].End(xlUp).Offset(, 1) = .List(.ListIndex, 1)
.ListFillRange = "DM!A2:B" & Sheets("DM").[A65536].End(xlUp).Row
End With
End Sub