Báo lỗi Run-time erro 424 khi mở form (1 người xem)

[Cuongnv0920]

Mình đang làm theo HƯỚNG DẪN TẠO USERFORM TRA CỨU DỮ LIỆU của hocexcel.online
link: https://blog.hocexcel.online/userform-nhap-lieu-va-tra-cuu.html
khi mình cố gắng mở userform bằng sự kiện Private Sub UserForm_Initialize() thì báo lỗi (run-time erro 424)
nhưng khi mình để sự kiện Private Sub UserForm_Click() thì không báo lỗi nữa, nhưng listboox lại ko hiển thị gì, và cũng ko search được gì
các Pro giúp em với ạ. (file đính kèm)

 

[SA_DQ]

Cần xác định dòng nào có lỗi:

Private Sub UserForm_Initialize()
On Error GoTo LoiCT
1    Set Dic = CreateObject("Scripting.Dictionary")   
2    sArray = S2.Range("A2:N" & S2.[A65536].End(xlUp).Row).Value   
3    LBDMHH.List() = sArray
    CBDMHH.List = Sheet3.[A1:A5].Value
4    CBDMHH.Value = "ALL"
    TXTFIND_Change
Err_:           Exit Sub
LoiCT:
    If Err = 424 Then
        MsgBox Erl
    Else
        MsgBox Err:
    End If
    Resume Err_
End Sub

Những mong hữu ích với bạn chút nào đó, dù nhỏ nhoi.

 

[ndu96081631]

Mình đang làm theo HƯỚNG DẪN TẠO USERFORM TRA CỨU DỮ LIỆU của hocexcel.online
link: https://blog.hocexcel.online/userform-nhap-lieu-va-tra-cuu.html
khi mình cố gắng mở userform bằng sự kiện Private Sub UserForm_Initialize() thì báo lỗi (run-time erro 424)
nhưng khi mình để sự kiện Private Sub UserForm_Click() thì không báo lỗi nữa, nhưng listboox lại ko hiển thị gì, và cũng ko search được gì
các Pro giúp em với ạ. (file đính kèm)

Mắc cười ghê! Cái trang web đó ăn cắp hàm tôi viết đó bạn. Mà hàm đó là phiên bản đầu tiên, không còn chính xác nữa đâu
Nói chung là: Mọi thứ đều có trên GPE, tìm là thấy mà không cần phải tìm ở trang nào cả
Ngoài hàm Filter2DArray ra thì bài hướng dẫn còn sai rất nhiều chỗ, cá là làm theo cũng không bao giờ chạy được

 

[Cuongnv0920]

Mắc cười ghê! Cái trang web đó ăn cắp hàm tôi viết đó bạn. Mà hàm đó là phiên bản đầu tiên, không còn chính xác nữa đâu
Nói chung là: Mọi thứ đều có trên GPE, tìm là thấy mà không cần phải tìm ở trang nào cả
Ngoài hàm Filter2DArray ra thì bài hướng dẫn còn sai rất nhiều chỗ, cá là làm theo cũng không bao giờ chạy được

Mình đã làm được nhờ tham khảo trên GPE
bác có thể giúp em 1 việc là: sau khi search được Vật tư cần chọn thì bấm nút OK danh mục đó sẽ được thêm vào bảng tính ở sheert "CHON"
Cám ơn bác nhiều nhé.