tạo 2 listbox có tìm kiếm trong userform

[hahuykhuong]

Xin chào các Bác.
Em đang tự học làm file bán hàng bằng excel, để tiện cho quá trình nhập hóa đơn em muốn cho luôn danh sách khách hàng vào userform cùng với danh sách sản phẩm và tìm kiếm khách hàng giống như tiềm kiếm sản phẩm. Nhưng tìm sản phẩm thì code chạy mà em sao sang danh sách khách hàng lại không chạy. các bác biết xử lý giúp em với ạ.
dưới đây là ảnh và file em đang làm. em cảm ơn nhiều ạ.

 

[zzzsxxx01]

Bạn xem lại code ở Private Sub TXTKH_Change(), thiếu phần code đưa kết quả sau khi tìm kiếm vào listbox nhé.

 

[hahuykhuong]

Bạn xem lại code ở Private Sub TXTKH_Change(), thiếu phần code đưa kết quả sau khi tìm kiếm vào listbox nhé.

em thêm code lstkh = kq nó cũng không được, hay phải viết như thế nào ạ? Bác cho em xin code với ạ, copy code của txttimkiem nó cũng không được.

 

[zzzsxxx01]

em thêm code lstkh = kq nó cũng không được, hay phải viết như thế nào ạ? Bác cho em xin code với ạ, copy code của txttimkiem nó cũng không được.

Ở Private Sub TXTKH_Change() bạn loại bỏ code Or arr(i, 2) Like "*" & UCase(dk) & "*" và viết thêm code gán kết quả vào listbox như bạn viết ở Private Sub TXTTIMKIEM_Change() là được.

 

[hahuykhuong]

Ở Private Sub TXTKH_Change() bạn loại bỏ code Or arr(i, 2) Like "*" & UCase(dk) & "*" và viết thêm code gán kết quả vào listbox như bạn viết ở Private Sub TXTTIMKIEM_Change() là được.

cảm ơn Bác nhiều ạ. em sửa được rồi ạ.