Hỏi cách tạo combo box thông minh

[lee chung]

Bạn học trên GPE đã là quá quá đủ rồi
Bạn học hết được các chiêu thức VBA trên GPE chắc còn dài dài nữa
Bạn tự search đi

ý của mình là nhờ các bạn chỉ giúp link học hỏi những kiến thức về vba excell ở tại GPE này, vì hầu như tất cả bài viết về các code của testbox listbox .....rất ít được chú thích, mình không hiểu trong code viết như thế nghĩa là gì, vì sao lại viết như thế.... cho nên khi thấy bài nào gần giống yêu cầu của mình thì cứ copy code dán vào file của mình,làm như thế chỉ mang tính hên xui, thế là dường như không thể làm được gì cã. Chứ ở GPE kiến thức bao la học đến già vẫn chưa hết

 

[Quang_Hải]

ý của mình là nhờ các bạn chỉ giúp link học hỏi những kiến thức về vba excell ở tại GPE này, vì hầu như tất cả bài viết về các code của testbox listbox .....rất ít được chú thích, mình không hiểu trong code viết như thế nghĩa là gì, vì sao lại viết như thế.... cho nên khi thấy bài nào gần giống yêu cầu của mình thì cứ copy code dán vào file của mình,làm như thế chỉ mang tính hên xui, thế là dường như không thể làm được gì cã. Chứ ở GPE kiến thức bao la học đến già vẫn chưa hết

Cho dù có chú thích cũng khó hiểu nếu bạn chưa có nền tảng cơ bản về VBA. Cứ từ từ học rồi sẽ hiểu thôi. Nếu muốn nhanh thì chỉ còn cách đến trường lớp học bài bản.

 

[lee chung]

Mấy vụ này mình kém lắm. Thử thế này xem sao

bạn ơi tất cả đều rất tuyệt chỉ còn 1 vấn đề là khi cần gỏ gấp một tên mới hay một địa điểm mới không nằm trong sheet Khach_hang thì không thể nào nhập trực tiếp vào trong ô được, bạn giúp trường hợp này luôn nhe bạn

 

[Quang_Hải]

bạn ơi tất cả đều rất tuyệt chỉ còn 1 vấn đề là khi cần gỏ gấp một tên mới hay một địa điểm mới không nằm trong sheet Khach_hang thì không thể nào nhập trực tiếp vào trong ô được, bạn giúp trường hợp này luôn nhe bạn

Tìm và thêm dòng code màu xanh vào code này

Private Sub TextBox1_Change()
[COLOR=#0000ff]ActiveCell = Sheet1.TextBox1.Value[/COLOR]
loc
End Sub

 

[lee chung]

Tìm và thêm dòng code màu xanh vào code này

Private Sub TextBox1_Change()
[COLOR=#0000ff]ActiveCell = Sheet1.TextBox1.Value[/COLOR]
loc
End Sub

Bạn hay quá giống như nhà phép thuật vậy hô biến thành gì là ra ngay. Hì hì... bạn ơi mình mới phát hiện ra nếu lở nhập dư tên khách hàng hoặc địa điểm giao hàng thì xóa nội dung trong ô như thế nào đây làm phiền bạn giúp giùm luôn ghen.

 

[Quang_Hải]

Bạn hay quá giống như nhà phép thuật vậy hô biến thành gì là ra ngay. Hì hì... bạn ơi mình mới phát hiện ra nếu lở nhập dư tên khách hàng hoặc địa điểm giao hàng thì xóa nội dung trong ô như thế nào đây làm phiền bạn giúp giùm luôn ghen.

Chọn ô cần xóa hay sửa gì đó, chạm vào thanh spacebar là xóa rồi

 

[Good-Luck]

Bạn hay quá giống như nhà phép thuật vậy hô biến thành gì là ra ngay. Hì hì... bạn ơi mình mới phát hiện ra nếu lở nhập dư tên khách hàng hoặc địa điểm giao hàng thì xóa nội dung trong ô như thế nào đây làm phiền bạn giúp giùm luôn ghen.

phải hay hơn nhà phép thuật chứ, vì máy nhà phép thuật đó thường chỉ là nhà <ảo thuật> lừa mắt người xem thôi, còn đây là muốn gì có náy 100% hàng chính hiệu

 

[lee chung]

Bạn quanghai1969 mến mình thấy khi gỏ từ --> ra list danh sách chọn lựa, ở bước này nếu bạn có thể thêm thao tác dùng bàn phím (nhóm phím điều khiển con trỏ lên, xuống, qua, lại ) để chọn tên trong danh sách xổ ra xong bấm phím enter là tên được chọn sẻ nhập vào ô luôn không cần đến thao tác click chuột để chọn, giống như khi mình gỏ từ tìm kiếm trên google cũng ra danh sách, mình chỉ cần bấm phím trỏ xuống là dòng chọn xuất hiện trong danh sách và nó chạy lên hoặc xuống theo phím bấm dời lên xuống, khi đã xác định đúng dòng mình chọn chỉ cần bấm phím enter là dòng đó gắn vào thanh dò tìm google.Như vậy thao tác nhập dữ liệu sẻ khỏe hơn.

 

[lee chung]

phải hay hơn nhà phép thuật chứ, vì máy nhà phép thuật đó thường chỉ là nhà <ảo thuật> lừa mắt người xem thôi, còn đây là muốn gì có náy 100% hàng chính hiệu

Mình muốn nói là quanghai1969 giỏi như Harry Potter

 

[Quang_Hải]

Bạn quanghai1969 mến mình thấy khi gỏ từ --> ra list danh sách chọn lựa, ở bước này nếu bạn có thể thêm thao tác dùng bàn phím (nhóm phím điều khiển con trỏ lên, xuống, qua, lại ) để chọn tên trong danh sách xổ ra xong bấm phím enter là tên được chọn sẻ nhập vào ô luôn không cần đến thao tác click chuột để chọn, giống như khi mình gỏ từ tìm kiếm trên google cũng ra danh sách, mình chỉ cần bấm phím trỏ xuống là dòng chọn xuất hiện trong danh sách và nó chạy lên hoặc xuống theo phím bấm dời lên xuống, khi đã xác định đúng dòng mình chọn chỉ cần bấm phím enter là dòng đó gắn vào thanh dò tìm google.Như vậy thao tác nhập dữ liệu sẻ khỏe hơn.

Bạn còn yêu cầu gì thì suy nghĩ và cung cấp thông tin 1 lần nhé. Code viêt xong sửa lại mệt lắm.
Cung cấp cái file của bạn luôn để mình có thể nhìn thấy du liệu thật của bạn và viết cho đúng yêu cầu. Nếu không có gi thay đổi thì 1 tuần sau quay lại nhé.

 

[Hong.Van]

Bạn còn yêu cầu gì thì suy nghĩ và cung cấp thông tin 1 lần nhé. Code viêt xong sửa lại mệt lắm.
Cung cấp cái file của bạn luôn để mình có thể nhìn thấy du liệu thật của bạn và viết cho đúng yêu cầu. Nếu không có gi thay đổi thì 1 tuần sau quay lại nhé.

Depature > Connection ?
Hay là Departure> Connection
Em không hiểu?

 

[Quang_Hải]

Depature > Connection ?
Hay là Departure> Connection
Em không hiểu?

H Vân cũng tinh mắt ghê hén. Hôm nay sao thế nhỉ? 0908 mà cũng gõ ra 0909, Depart mà gõ ra Depat. Hic

 

[ndhmoney686]

Bạn còn yêu cầu gì thì suy nghĩ và cung cấp thông tin 1 lần nhé. Code viêt xong sửa lại mệt lắm.
Cung cấp cái file của bạn luôn để mình có thể nhìn thấy du liệu thật của bạn và viết cho đúng yêu cầu. Nếu không có gi thay đổi thì 1 tuần sau quay lại nhé.

Em chào Anh Quanghai1969 ! Code này của Anh hay quá. Em có vài ý ở dưới mong Anh giúp đỡ.


- Em thấy các ô đã chọn. Nếu muốn xóa thì ko xóa được (em thử đặt con trỏ chuột vào ô có dữ liệu rồi nhấn phím spacebar, hoặc delete, hoặc backspace cũng ko thấy xóa được). Mong Anh chỉ giúp.

- Khi gõ từ gợi nhớ -> list danh sách xổ ra. Nếu sử dụng thêm được nhóm phím điều khiển con trỏ -> sang phải, rồi -> lên, xuống. Để chọn tên trong list danh sách xổ ra, xong nhấn phím enter là tên được chọn sẽ nhập vào ô luôn. Như vậy thì khi nhập dữ liệu sử dụng bàn phím nhiều sẽ rất tiện. Mong Anh bổ sung thêm.

- Nếu sheet "Lenh.giao.hang" và "Bang.ke.ban.hang" có thêm cột "Tên hàng". Để cột "Tên hàng" cũng chọn được list danh sách như cột "Khách hàng" và "Địa điểm giao hàng". Thì phải làm thế nào được Anh.

Mong Anh chỉnh sửa code file đính kèm giúp Em. Cảm ơn Anh rất nhiều!

 

[Quang_Hải]

Em chào Anh Quanghai1969 ! Code này của Anh hay quá. Em có vài ý ở dưới mong Anh giúp đỡ.


- Em thấy các ô đã chọn. Nếu muốn xóa thì ko xóa được (em thử đặt con trỏ chuột vào ô có dữ liệu rồi nhấn phím spacebar, hoặc delete, hoặc backspace cũng ko thấy xóa được). Mong Anh chỉ giúp.



- Khi gõ từ gợi nhớ -> list danh sách xổ ra. Nếu sử dụng thêm được nhóm phím điều khiển con trỏ -> sang phải, rồi -> lên, xuống. Để chọn tên trong list danh sách xổ ra, xong nhấn phím enter là tên được chọn sẽ nhập vào ô luôn. Như vậy thì khi nhập dữ liệu sử dụng bàn phím nhiều sẽ rất tiện. Mong Anh bổ sung thêm.

- Nếu sheet "Lenh.giao.hang" và "Bang.ke.ban.hang" có thêm cột "Tên hàng". Để cột "Tên hàng" cũng chọn được list danh sách như cột "Khách hàng" và "Địa điểm giao hàng". Thì phải làm thế nào được Anh.

Mong Anh chỉnh sửa code file đính kèm giúp Em. Cảm ơn Anh rất nhiều!

Bài này chắc đáp ứng được cho cả 2 bạn 1 lúc nhỉ! Thử xem, nếu chưa thoả mản thì mần tiếp. Mình thì kiểu gì cũng mần hết. Hỏng trúng ráng chịu.

 

[ndhmoney686]

Anh ơi sheet "Bang.ke.ban.hang" cần phải chỉnh code như thế nào để chạy được vậy Anh? Với các Danh mục thì để chung hết vào 1 sheet ạ (chắc tách ra thì code sẽ dài phải ko Anh). Các vấn đề của Em đưa ra ở trên đã được Anh giải quyết Ok hết rồi.
Code này thật tuyệt vời. Cảm ơn Anh Quanghai1969 rất nhiều. Chúc Anh và Gia đình ngủ ngon và có những giấc mơ Hạnh Phúc!

 

[Quang_Hải]

Anh ơi sheet "Bang.ke.ban.hang" cần phải chỉnh code như thế nào để chạy được vậy Anh? Với các Danh mục thì để chung hết vào 1 sheet ạ (chắc tách ra thì code sẽ dài phải ko Anh). Các vấn đề của Em đưa ra ở trên đã được Anh giải quyết Ok hết rồi.
Code này thật tuyệt vời. Cảm ơn Anh Quanghai1696 rất nhiều. Chúc Anh và Gia đình ngủ ngon và có những giấc mơ Hạnh Phúc!

Ôi quên để ý cái sheet Bang Ke Ban Hang

 

[ndhmoney686]

Ôi quên để ý cái sheet Bang Ke Ban Hang

Code của Anh thật tuyệt. Cảm ơn Anh rất nhiều! Anh đi nghỉ sớm để đảm bảo sức khỏe Anh ạ!

 

[Good-Luck]

Code của Anh thật tuyệt. Cảm ơn Anh rất nhiều! Anh đi nghỉ sớm để đảm bảo sức khỏe Anh ạ!

Anh QuanHai có người quan tâm sức khỏe rồi nha. vậy là có thêm 1 điểm chung của tungnguyen rôi nha

Đúng là 2 người nhưng lại có rất nhiều điểm giống nhau:
I.Giống nhau
1. Sống tại Bình dương
2. Đẹp trai chịu không nổi
3. Đam mê GPE
4. Ăn nói nhẹ nhàng
n. ....
II. Khác nhau
1. Có nhiều cô gái trẻ đẹp đeo đuổi Tungnguyen_kt nhưng Quanghai thì ở không
2. Tungnguyen_kt đi xe 2 bánh nhưng Quanghai di xe buýt nhiều bánh hơn
3. Khi uống bia thì Tungnguyen_kt uống 1/2 thùng không chạy xe nổi, nhưng Quanghai thì không nhúc nhích (nằm bất động)
n...

 

[lee chung]

Bài này chắc đáp ứng được cho cả 2 bạn 1 lúc nhỉ! Thử xem, nếu chưa thoả mản thì mần tiếp. Mình thì kiểu gì cũng mần hết. Hỏng trúng ráng chịu.

Cám ơn bạn quanghai1969 rất.. rất nhiều lần này bạn làm lại quả là trên cả tuyệt vời luôn mình đang khát khao có được code như thế đó.

 

[ndhmoney686]

Em chào Anh Quanghai1969 ! Code hôm trước của Anh em thấy tuyệt quá, muốn ứng dụng thử. Nhưng khi em thử thêm sheet và tạo mới các cột "Tên hàng", "Khu vực giao", "Tên kho", "Khách hàng". Thì không biết cách, Ví dụ cột "Tên hàng" thì chỉnh code như thế nào để nó lấy đúng "Tên hàng". Muốn hỏi Anh mấy hôm trước nhưng ngại. Ngồi mấy ngày nay rồi mày mò nhưng ko được. Hôm nay đành liều lên đây nhờ Anh giúp. Mong Anh sủa code trong file giúp em lại để em có thểm tham khảo code của Anh. Em cảm ơn Anh!