Nhờ gỡ lỗi combobox.

Liên hệ QC

Tienmanhphat

Thành viên mới
Tham gia
22/8/21
Bài viết
3
Được thích
0
Chào cả nhà. em cũng lụm lặt lung tung trên mạng về để làm cho mình file này (file đính kèm).
1) Có 1 vấn đề là: ở sheet: "nhập dữ liệu", 1 trong 2 combobox được chọn (text nằm trong combobox). Khi em bấm qua combobox còn lại nhấn text để tìm kiếm thì
combobox đã được chọn sổ list xuống. Phải thao tác chọn lại trong list đó rồi mới thao tác tìm kiếm trong combobox còn lại được,
2) Và khi em thao tác ở các sheet khác cũng như file excel khác. nhập text và nhấn Enter thì combobox đó vẫn sổ list xuống như vậy.
Mong các anh chị gỡ lỗi này giúp em ạ. Em không biết gì về VBA hết.
Em cảm ơn.
 

File đính kèm

  • Nhập phiếu mua hàng.xlsm
    98.8 KB · Đọc: 9
Lần chỉnh sửa cuối:
Chào cả nhà. em cũng lụm lặt lung tung trên mạng về để làm cho mình file này (file đính kèm).
1) Có 1 vấn đề là: ở sheet: "nhập dữ liệu", 1 trong 2 combobox được chọn (text nằm trong combobox). Khi em bấm qua combobox còn lại nhấn text để tìm kiếm thì
combobox đã được chọn sổ list xuống. Phải thao tác chọn lại trong list đó rồi mới thao tác tìm kiếm trong combobox còn lại được,
2) Và khi em thao tác ở các sheet khác cũng như file excel khác. nhập text và nhấn Enter thì combobox đó vẫn sổ list xuống như vậy.
Mong các anh chị gỡ lỗi này giúp em ạ. Em không biết gì về VBA hết.
Em cảm ơn.
Xóa 2 dòng ComboBox1.DropDown trong module của sheet 'Nhap du lieu' đi:
Rich (BB code):
Private Sub ComboBox1_Change()
Application.ScreenUpdating = False
'ComboBox1.DropDown
Application.ScreenUpdating = True
End Sub

Private Sub ComboBox2_Change()
Application.ScreenUpdating = False
'ComboBox2.DropDown
Application.ScreenUpdating = True
End Sub
 
Upvote 0
Xóa 2 dòng ComboBox1.DropDown trong module của sheet 'Nhap du lieu' đi:
Rich (BB code):
Private Sub ComboBox1_Change()
Application.ScreenUpdating = False
'ComboBox1.DropDown
Application.ScreenUpdating = True
End Sub

Private Sub ComboBox2_Change()
Application.ScreenUpdating = False
'ComboBox2.DropDown
Application.ScreenUpdating = True
End Sub
Bạn oi. Mình sửa lại như này thì khi đánh chữ vào combobox nó không sổ list tìm kiếm theo chữ nữa bạn.
Trong List sổ xuống, mình chọn kết quả đầu thì nó được gán vào combobox đó.
Chọn các kết quả dưới nó không gán chữ vào combobox thì thao tác bình thường.
 
Lần chỉnh sửa cuối:
Upvote 0
Mình đã tìm được cách khắc phục lỗi rồi. Cảm ơn cả nhà nhé.
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom