Cách sử dụng Combo Box (ActiveX Control)

Liên hệ QC

auman

Thành viên mới
Tham gia
20/5/12
Bài viết
19
Được thích
8
Nghề nghiệp
Âu Dương Mạn
Chào mọi người!
Tình hình là em có Record 1 đoạn marco lại để chạy thử nhập liệu! Nhưng sau khi chạy nút "Nhập Liệu" thì "List" của cái Combo box nó cứ bị hiện đè lên!
Cái nữa là có cách nào để tăng thêm dòng hiển thị cho cái Combo box này không ạ! Em tắt đi và mở file lại nếu gõ từ khóa mà có 1 kết quả liên quan thì nó hiện list có 1 cái! Xong e gõ từ khóa có 10 kết quả liên quan thì nó cũng chỉ hiện list 1 kết quả mà thôi ạ!
Còn cái cuối là em muốn khi ấn nút Nhập liệu thì cái combo box đấy nó tự xóa hết ký tự đi để nhập lại thì viết code thế nào ạ!
Em có gửi file đính kèm, mong mọi người chỉ giáo! Em chân thành cảm ơn ạ! hy
 

File đính kèm

bỏ chữ [giúp đỡ] đi - vì đăng lên đây là hỏi và giúp đỡ rồi, tiêu đề vẫn còn chung chung- hãy phản ánh nội dung chính cần hỏi
Sửa tiêu đề đi
 
Chào mọi người!
Tình hình là em có Record 1 đoạn marco lại để chạy thử nhập liệu! Nhưng sau khi chạy nút "Nhập Liệu" thì "List" của cái Combo box nó cứ bị hiện đè lên!
Tắt cái lệnh CmbListTSCD.DropDown ở trong code của sheet NhapLieuTDTSCD là sẽ hết hiện tượng trên
Bài đã được tự động gộp:

Cái nữa là có cách nào để tăng thêm dòng hiển thị cho cái Combo box này không ạ! Em tắt đi và mở file lại nếu gõ từ khóa mà có 1 kết quả liên quan thì nó hiện list có 1 cái! Xong e gõ từ khóa có 10 kết quả liên quan thì nó cũng chỉ hiện list 1 kết quả mà thôi ạ!
Cái này bạn xem lại name gán với list của combo box. Không hiện ra list là do công thức trong name có vấn đề. Bạn xem lại công thức
Vì như file của bạn mình tạm gán list cho vùng khác thì combo box hiện đủ luôn
Còn cái cuối là em muốn khi ấn nút Nhập liệu thì cái combo box đấy nó tự xóa hết ký tự đi để nhập lại thì viết code thế nào ạ!
Bạn thêm dòng lệnh này vào ở cuối lệnh của nút Nhập liệu
Mã:
   With Sheet1
    Sheet1.Select
    Range("B2").ClearContents
    End With
 

File đính kèm

Lần chỉnh sửa cuối:
Tắt cái lệnh CmbListTSCD.DropDown ở trong code của sheet NhapLieuTDTSCD là sẽ hết hiện tượng trên
Cảm ơn anh. Nếu không để lệnh CmbListTSCD.DropDown thì khi gõ vào nó không tự hiện ra list gợi ý! Vậy còn cách nào để hiện ra List gợi ý mà không bị lỗi không ạ!
 
Cảm ơn anh. Nếu không để lệnh CmbListTSCD.DropDown thì khi gõ vào nó không tự hiện ra list gợi ý! Vậy còn cách nào để hiện ra List gợi ý mà không bị lỗi không ạ!
Vậy bạn sửa thành CmbListTSCD.ShowDropButtonWhen = fmShowDropButtonWhenFocus
Xem file gửi kèm. Mở file lên; Ấn nút Nhập liệu và xem nó hoạt động
 

File đính kèm

Vậy bạn sửa thành CmbListTSCD.ShowDropButtonWhen = fmShowDropButtonWhenFocus
Xem file gửi kèm. Mở file lên; Ấn nút Nhập liệu và xem nó hoạt động
Nó chưa hoạt động như mong muốn ban đầu của e anh ạ! Em muốn là khi mình gõ từ "ép vào combo box chẳng hạn thì nó sẽ hiện list các máy có liên quan đến từ "ép" ra để mình chọn hoặc tìm cho nhanh ấy ạ!
Như file anh gửi thì combo box lúc này cố định luôn rồi có gõ nó cũng ko gợi ý gì hết ạ
 
Nó chưa hoạt động như mong muốn ban đầu của e anh ạ! Em muốn là khi mình gõ từ "ép vào combo box chẳng hạn thì nó sẽ hiện list các máy có liên quan đến từ "ép" ra để mình chọn hoặc tìm cho nhanh ấy ạ!
Như file anh gửi thì combo box lúc này cố định luôn rồi có gõ nó cũng ko gợi ý gì hết ạ
Mình vừa sửa và up lại ở #5. Bạn tải nhé
Mình chỉ giúp bạn ở phần hiện list khi nhập dữ liệu vào combo box. Còn hiện cái gì thì bạn tự chỉnh sửa lại công thức trong name file gốc của bạn nhé. Trong file mình gửi mình tạm lấy list là toàn bộ danh mục máy
 
Web KT

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

Back
Top Bottom