làm việc với combobox?

[hoatinhyeu862000]

Anh/chị cho hỏi cách thức đưa 1 vùng dữ liệu vào combobox?
như file e đưa ra em muốn cbb1 sẽ lấy kết quả từ cột A "A2:A65530" của sheet1 vào box và có thể lựa chọn hiển thị 1 tên mình muồn trực tiếp trên cbb đó.
trong trường hơpf thoát file đó và vào lại thì mặc định luôn tên người sử dụng cuối cùng của phiên làm việc trước đó trên cbb?
Cái này giống như tên nhân viên bàn hàng ấy ạ!
cảm ơn anh chị!

 

[Hoàng Trọng Nghĩa]

Anh/chị cho hỏi cách thức đưa 1 vùng dữ liệu vào combobox?
như file e đưa ra em muốn cbb1 sẽ lấy kết quả từ cột A "A2:A65530" của sheet1 vào box và có thể lựa chọn hiển thị 1 tên mình muồn trực tiếp trên cbb đó.
trong trường hơpf thoát file đó và vào lại thì mặc định luôn tên người sử dụng cuối cùng của phiên làm việc trước đó trên cbb?
Cái này giống như tên nhân viên bàn hàng ấy ạ!
cảm ơn anh chị!

Có 2 cách cơ bản nha bạn, nhưng 2 cách này chỉ được sử dụng 1 trong 2 chứ không được dùng chung nhé!

Cách thứ nhất, dùng List, thủ tục được chép trong UserForm Module:

Private Sub UserForm_Initialize()
    ComboBox1.List = Sheets("Sheet1").Range("A1:A6").Value
End Sub

Cách thứ hai, dùng RowSource:

Đặt con trỏ vào ComboBox, trong thuộc tính (properties) của nó, chọn vào mục RowSource và gõ vào: Sheet1!A1:A6

 

[hoatinhyeu862000]

Có 2 cách cơ bản nha bạn, nhưng 2 cách này chỉ được sử dụng 1 trong 2 chứ không được dùng chung nhé!

Cách thứ nhất, dùng List, thủ tục được chép trong UserForm Module:

Private Sub UserForm_Initialize()
    ComboBox1.List = Sheets("Sheet1").Range("A1:A6").Value
End Sub

Cách thứ hai, dùng RowSource:

Đặt con trỏ vào ComboBox, trong thuộc tính (properties) của nó, chọn vào mục RowSource và gõ vào: Sheet1!A1:A6

Cảm ơn anh cho em xin hỏi thêm trường hợp "trong trường hợp thoát file đó và vào lại thì mặc định luôn tên người sử dụng cuối cùng của phiên làm việc trước đó trên cbb?"
thì sao ạ. nếu em có thêm 1 textbox1 nữa em muốn sau khi chon xong tên nó sẽ tự động setfocus cho textbox đó đc k ạ?

 

[Hoàng Trọng Nghĩa]

Cảm ơn anh cho em xin hỏi thêm trường hợp "trong trường hợp thoát file đó và vào lại thì mặc định luôn tên người sử dụng cuối cùng của phiên làm việc trước đó trên cbb?"
thì sao ạ. nếu em có thêm 1 textbox1 nữa em muốn sau khi chon xong tên nó sẽ tự động setfocus cho textbox đó đc k ạ?

Cái phần màu đỏ tôi không hiểu bạn nói gì, tôi đâu biết rằng bạn có nhập tên người cuối cùng vào đâu? Làm sao mà nó hiểu người nào sử dụng hả bạn?

 

[hoatinhyeu862000]

Vậy có cách nào để mặc định 1 tên em ví dụ như trong vùng là ô A1 đc không ạ? tức là nó luôn luôn mặc định tên người dùng là dòng A1 ấy ạ?

 

[Hoàng Trọng Nghĩa]

Vậy có cách nào để mặc định 1 tên em ví dụ như trong vùng là ô A1 đc không ạ? tức là nó luôn luôn mặc định tên người dùng là dòng A1 ấy ạ?

Bạn muốn mặc định tên ai trong danh sách đó thì bạn làm như sau:

Private Sub UserForm_Initialize()
    ComboBox1.List = Sheets("Sheet1").Range("A1:A6").Value
    'mac dinh la ten NG VAN C:
    'ComboBox1 = "NG VAN C"
    'con khong thi tham chieu dia chi:
    ComboBox1 = Sheets("Sheet1").Range("A3").Value
End Sub