Hoàn thiện code điền mã khách ???

[minhcong.tckt]

Em gửi file đính kèm, mong các huynh tỷ giúp đỡ
Tại sheet : Nhật ký chung chuột phải để điền mã khách
Khi đánh từ khóa vào textbox thì code mới tìm theo mã nhà cung cấp mà chưa tìm nhanh theo "chương trình" khi em chọn option Chương trình


Anh, chị chỉnh code cho em với
mật khẩu để mở code là: minh cong
Chân thành cảm ơn!!!

 

[ThuNghi]

Em gửi file đính kèm, mong các huynh tỷ giúp đỡ
Tại sheet : Nhật ký chung chuột phải để điền mã khách
Khi đánh từ khóa vào textbox thì code mới tìm theo mã nhà cung cấp mà chưa tìm nhanh theo "chương trình" khi em chọn option Chương trình


Anh, chị chỉnh code cho em với
mật khẩu để mở code là: minh cong
Chân thành cảm ơn!!!

Tôi thấy tìm ào ào, chưa hiểu chỉnh cái gì. Cụ thể hơn nữa đi. Cám ơn!

 

[minhcong.tckt]

Khi chọn option 1 và 2 và tìm kiếm ở textBox
ThuNghi sẽ thấy nó chỉ thiên về tìm nhanh "Nhà Cung cấp" còn " chương trình " thì mình vẫn phải tìm bằng kéo chuột đến đúng chương trình => hơi thủ công

 

[ThuNghi]

Khi chọn option 1 và 2 và tìm kiếm ở textBox
ThuNghi sẽ thấy nó chỉ thiên về tìm nhanh "Nhà Cung cấp" còn " chương trình " thì mình vẫn phải tìm bằng kéo chuột đến đúng chương trình => hơi thủ công

Trong code

Private Sub UserForm_Initialize()

Thay dòng này

sArray = Sheets("DMKHNCC").Range("DMKH1").Value

thành

sArray = Sheets("DMHH").Range("DM_CT").Value

Để nó nạp list từ range trên.

 

[ndu96081631]

Em gửi file đính kèm, mong các huynh tỷ giúp đỡ
Tại sheet : Nhật ký chung chuột phải để điền mã khách
Khi đánh từ khóa vào textbox thì code mới tìm theo mã nhà cung cấp mà chưa tìm nhanh theo "chương trình" khi em chọn option Chương trình


Anh, chị chỉnh code cho em với
mật khẩu để mở code là: minh cong
Chân thành cảm ơn!!!

Sửa code của OptionButton thành vầy xem

Private Sub OptionButton1_Click()
  LB.List() = Sheets("DMKHNCC").Range("DMKH1").Value
  sArray = LB.List
End Sub

Private Sub OptionButton2_Click()
  LB.List() = Sheets("DMHH").Range("DM_CT").Value
  sArray = LB.List
End Sub

Tức là khi bạn bấm OptionButton thì bạn cũng phải thay đổi source data luôn chứ