Tạo tiêu đề cho Listbox?

[Excel_Fan]

Chào các bạn!
Tôi viết marco cho Excel trong đó có sử dụng UserForm và Listbox.
Listbox có nhiều có nhiều cột (multicolumn). Tôi không sao tạo tiêu đề cho các cột được (Heading of column). Listbox tôi sử dụng có nội dung thay đổi theo các tính huống trong chương trình.
Nhờ các Bạn chỉ giúp hoặc có file mẫu về việc này cho tôi xin với.

Cám ơn nhiều

 

[vungoc]

Trong cửa sổ VBE, bạn Click chọn Listbox -> trong phần Propeties tại dòng ColumnHeads bạn chọn: true là được.

 

[Excel_Fan]

Cám ơn Bạ đã chỉ. Tôi dã làm như Bạn hướng dẩn nhưng vẫn gặp khó khăn khi additem vào. Sau khi add tiêu đề, tiếp tục add nội dung cho Listbox thì phần nội dung xóa mất tiêu đề. Nếu được mong Bạn chỉ giúp.
Cám ơn nhiều.

 

[vungoc]

Bạn nói hơi khó hiểu; nên đưa file lên và mô tả sao cho dễ hiểu hơn nhé!

 

[SoiBien]

Thuộc tính Columnheads của Listbox chỉ có giá trị True/False, bạn muốn hiển thị columnheads thì chỉ có thể đưa các giá trị bạn muốn hiển thị vào một range trong worksheet với tiêu đề cột là dòng đầu tiên rồi sau đó đặt thuộc tính Rowsource của listbox tham chiếu tới Range trên.

Đây là ví dụ:

[color=darkblue]Private[/color] [color=darkblue]Sub[/color] UserForm_Initialize()
    [color=darkblue]With[/color] UserForm1
        .ListBox1.RowSource = "A2:C25"
        .ListBox1.ColumnHeads = [color=darkblue]True[/color]
        .ListBox1.ColumnCount = 3
        .ListBox1.ColumnWidths = "30,30,30"
    [color=darkblue]End[/color] [color=darkblue]With[/color]
[color=darkblue]End[/color] [color=darkblue]Sub[/color]

Nếu bạn muốn đổi tên các columnheads thì cứ đổi value của range("A1:C1")
Thân.

 

[Excel_Fan]

Cám ơn VuNgoc và Soibien.
Qua góp ý cua các Bạn tôi đã làm được.
Listbox của tôi chứa các phần tử của 1 mảng (động). Tôi cho các phần tử tương ứng với hàng đầu đầu tiên trong listbox nhận giá trị là các tiêu đề cột. Sau đó tôi add vào list box.
Thân chào!