Thầy cho hỏi : trong trường hợp danh sách ( để mở combobox ngày càng dài ra ( Vượt số 20 - mà mình thiết lập như bài giảng - thì có cách nào để VBA tự động kéo dài combobox ra theo không? ( Cụ thể là bài giảng thiết lập danh sách gồm 20 bộ phận nhưng khi sử dụng càng ngày càng có nhiều bộ phận hơn ví dụ 25 chẳng hạn - có cách nào VBA tự động kéo combobox tương ứng không?)
Để danh sách trong combobox tự động mở rộng thêm thì:
Bạn có thể xác định dòng đầu và dòng cuối của danh sách cần nạp, ví dụ: Sheet1.Range("A2:A" & dongcuoi)
Sau đó bạn nạp danh sách theo cú pháp đã hướng dẫn, áp dụng với vùng trên (thay vì vùng cố định)
For each chonten in Sheet1.Range("A2:A" & dongcuoi)
combobox1.AddItem chonten
Next chonten