Tạo column header cho listbox

Thảo luận trong 'Ứng dụng Excel' bắt đầu bởi trunghtpco, 5 Tháng năm 2008.

5,941 lượt xem

  1. trunghtpco

    trunghtpco Thành viên sơ cấp

    Bài viết:
    2
    Đã được thích:
    0
    Nơi ở:
    TH HCM
    Mình thiết kế 1 user form, có 1 listbox trong user form. MÌnh muốn dùng lệnh VBA để gán column header cho listbox, các bạn chỉ giúp minh với.
     
    #1
  2. phongvanvu

    phongvanvu Thành viên hoạt động

    Bài viết:
    14
    Đã được thích:
    0
    Nơi ở:
    Ha Noi
    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
     
    #2
  3. trunghtpco

    trunghtpco Thành viên sơ cấp

    Bài viết:
    2
    Đã được thích:
    0
    Nơi ở:
    TH HCM
    Nhưng ở đây mình muốn dùng lệnh VBA thôi, mình không dùng vùng dữ liệu trên excel.
     
    #3
  4. phongvanvu

    phongvanvu Thành viên hoạt động

    Bài viết:
    14
    Đã được thích:
    0
    Nơi ở:
    Ha Noi
    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
     
    #4

Chia sẻ trang này