Xin các bác chỉ giúp sao em nhập danh sách từ listbox kết hợp với tìm kiếm bi báo lỗi ạ

[huongtinh1929]

em mong các bác chỉ giúp. Xin trân thành cảm ơn các bác ạ.

 

[Nguyễn Hồng Quang]

em mong các bác chỉ giúp. Xin trân thành cảm ơn các bác ạ.

Mình mở file của bạn thì báo lỗi. Tuy nhiên bạn nên tham khảo các link này trước
https://www.giaiphapexcel.com/diendan/threads/nhờ-giúp-đỡ-filter-listbox-theo-điều-kiện-combo-box.134877/
hoặc
https://www.giaiphapexcel.com/diendan/threads/tạo-1-textbox-để-tìm-kiếm-bất-kỳ-nội-dung-trong-lisboxt-trên-cùng-1-userform-trong-vba.138875/
hoặc gõ từ khóa listbox tìm kiếm trên GPE cũng có rất nhiều

 

[huongtinh1929]

Mình mở file của bạn thì báo lỗi. Tuy nhiên bạn nên tham khảo các link này trước
https://www.giaiphapexcel.com/diendan/threads/nhờ-giúp-đỡ-filter-listbox-theo-điều-kiện-combo-box.134877/
hoặc
https://www.giaiphapexcel.com/diendan/threads/tạo-1-textbox-để-tìm-kiếm-bất-kỳ-nội-dung-trong-lisboxt-trên-cùng-1-userform-trong-vba.138875/
hoặc gõ từ khóa listbox tìm kiếm trên GPE cũng có rất nhiều

lỗi gì vậy huynh. huynh nói dõ cho đệ vơi.

 

[Nguyễn Hồng Quang]

lỗi gì vậy huynh. huynh nói dõ cho đệ vơi.

Mình kiểm tra thấy do đoạn này

  For i = LBound(arr, 1) To UBound(arr, 1)
        If InStr(LCase(arr(i, 1)), LCase(Trim(TxtTimkiem.Text))) Then
            .AddItem arr(i, 1)

Nguyên nhân là vì bạn nạp kết quả lọc vào mảng có 1 chiều nên khi đưa kết quả ra các label thì nó không tim thấy các cột 1,2,3,4, nên báo lỗi. Nếu bạn thay các số 1,2,3,4 thành số 0 chắc chắn sẽ hết lỗi liền

 

[Nguyễn Hồng Quang]

Về tra cứu bằng listbox cho bảng giá đất bạn xem bài này nhé https://www.giaiphapexcel.com/diendan/threads/nhờ-giúp-dùm-code-list-box.134941/. bài này được trả lời bởi anh Hoang2013
Mình trích ra 1 file của anh Hoang2013 trong bài trên. dùng listbox tra cứu khá thú vị (ngoài ra trong link này cũng có 1 số file khác bạn tham khảo thêm)