Bạn chỉ có thể tạo header nếu bạn trói(bind) listbox với một vùng(range). Trong Listbox: - đặt thuộc tính ColumnCount là số cột. - đặt ColumnHead là True - đặt RowSource là vùng dữ liệu Như vậy các cell trên cùng sẽ là tiêu đề của Listbox. Ví dụ: With Me.ListBox1 .RowSource = Range("A2:A5").Address End With
Không tạo được như thế! Bạn có thể tạo một range tạm trên một sheet rồi bind nó vào listbox thì mới được! Cách làm cụ thể như sau: Chép dữ liệu vào vùng dữ liệu tạm trên sheet ví dụ A2:A5 range("A2")=1 range("A3)=2 With Me.ListBox1 .RowSource = Range("A2:A5").Address End With