Tìm kiếm bằng Listbox

[doanhhoang79]

Chào các anh chị,

Tôi muốn sử dụng listbox để tìm kiếm nhanh dữ liệu:

Làm sao khi Dblclick chuột vào mã tương ứng ở listbox tìm kiếm thì nó sẽ đến đúng mã ở listbox chính. Tôi gửi file đính kèm để các anh chị xử lý giúp.
Trong file này sau khi Dblclick chuột ở listbox tìm kiếm thì nó không cho kết quả mong muốn ở listbox chính.

Mong được sự giúp đỡ,

 

[phamduylong]

Chào các anh chị,

Tôi muốn sử dụng listbox để tìm kiếm nhanh dữ liệu:
Làm sao khi Dblclick chuột vào mã tương ứng ở listbox tìm kiếm thì nó sẽ đến đúng mã ở listbox chính. Tôi gửi file đính kèm để các anh chị xử lý giúp.
Trong file này sau khi Dblclick chuột ở listbox tìm kiếm thì nó không cho kết quả mong muốn ở listbox chính.

Bạn chỉnh lại Sub Tim_Click của Form1

Private Sub Tim_Click()
UserForm2.ListBox1.ListIndex = UserForm1.ListBox1.ListIndex
UserForm2.Show
End Sub

 

[doanhhoang79]

Bạn chỉnh lại Sub Tim_Click của Form1

Private Sub Tim_Click()
UserForm2.ListBox1.ListIndex = UserForm1.ListBox1.ListIndex
UserForm2.Show
End Sub

Chưa được thầy ơi,

ý của em là phải click vào nút tìm kiếm trước tiên sau đó dblclick vào listbox ấy,

 

[doanhhoang79]

Tôi gửi file đính kèm mong mọi người giúp đỡ.

Khi dlclick chuột thì nó sẽ tìm đến mã tương ứng,

Cảm ơn,

 

[phamduylong]

Chưa được thầy ơi,
ý của em là phải click vào nút tìm kiếm trước tiên sau đó dblclick vào listbox ấy,

Người dùng có thể chọn 1 dòng nào đó trên Listbox, sau đó quyết định tìm kiếm. Chứ ai lại làm ngược, nhấn tìm kiếm nhưng không làm gì cả, nhấn dblclick thì lại tìm. Như vậy nút tỉm kiếm để làm gì?
Theo tôi, có 2 cách tìm:
1. Nhấn dblclick vào Listbox thì tìm luôn (bỏ qua nút tìm kiếm)
2. Click chọn vào Listbox, nhấn nút tìm kiếm để tìm
như vậy hợp lý hơn.
Em giải thích rõ ý đồ của em, tác dụng của nút tìm kiếm, dblclick liên hệ như thế nào mới viết được.
Bài này cũng có tại Giúp hoàn thiện code tìm kiếm dữ liệu bằng form.
Em không nên tạo cùng nội dung tại 2 topic, có thể bị xóa bài đấy

 

[sealand]

Bạn phải nói rõ là tìm theo điều kiện đã chọn ở đâu: Sheet --Form 2 --Chính Form1 (Tìm mục khác giống nó). Tìm xong thì làm gì?