Số cột tối đa của listbox

[mayouly]

Hôm rồi mình tạo form trong excel bằng vba, trong form mình gắn 1 listbox. Listbox này mình thiết lập 14 cột, chứa giá trị từ 14 textbox nhập vào.

With listbox1
.AddItem (Me.tb1)
.List(j, 1) = Me.tb2
.List(j, 2) = Me.tb3
.List(j, 3) = Me.tb4
.List(j, 4) = Me.tb5
.List(j, 5) = Me.tb6
.List(j, 6) = Me.tb7
.List(j, 7) = Me.tb8
.List(j, 8) = Me.tb9
.List(j, 9) = Me.tb10
.List(j, 10) = Me.tb11
.List(j, 11) = Me.tb12
.List(j, 12) = Me.tb13
.List(j, 13) = Me.tb14
End With

Cứ từ .list(j, 10 ) trở đi (tức cột 11 của listbox) là sẽ bị lỗi ko nhập giá trị được.
Mình thử chỉ thêm giá trị vào listbox từ cột 0 -

 

[nghiaphuc]

Bạn thử kiểm tra lại thuộc tính ColumnCount của Listbox1 thử xem sao, có thể nó nhận giá trị là 10. Bạn sửa lại là 14 nhé.
P/S: Xin lỗi, mình chưa nghiên cứu kỹ. Bạn thử vào VBE, chọn chức năng Help và gõ "ColumnCount", bạn sẽ thấy có câu như thế này:

Setting ColumnCount to 0 displays zero columns, and setting it to -1 displays all the available columns. For an unbound data source, there is a 10-column limit (0 to 9).

Như vậy là nhận định của bạn đúng đó.

 

[mayouly]

Cảm ơn bạn, nếu vậy thì mình sẽ gặp khó khăn rồi. Để mình xem coi có cách nào khắc phụ không. Không thì phải giảm column xuống, hoặc dùng 2 listbox vậy.

 

[sealand]

ListBox là dạng đối tượng liệt kê danh sách hạn chế cả về số cột và số dòng. Bạn dùng Listview xem sao.

 

[sealand]

Lại 1 vấn đề cần xem xét lại:
-Nếu dùng phương thức AddItem thì số cột tối đa là 9
-Nếu dùng List() thì mình thử như trong File lên tới 20 cột, chưa biết giới hạn ở đâu

 

[ptm0412]

Setting ColumnCount to 0 displays zero columns, and setting it to -1 displays all the available columns. For an unbound data source, there is a 10-column limit (0 to 9).

Theo câu trên, thì nếu set ColumnCount = -1 sẽ cho thể hiện hết mọi cột. Tôi đã thử với 1024 cột bằng file của Sealand.
(Sao file của sealand lại có author là thuanphat, 104 phan dang luu nhỉ? 104 phan dang luu ở trong này là 1 quán nhậu!)

 

[sealand]

He, He ...Anh Hai tài liên tưởng! Đây là Cty máy tính tại Kiến An-Hải Phòng.
Họ mới Reset máy tính cho mình nên họ đặt vậy.