Cần hiển thị dữ liệu dạng bảng trong Excel thông qua một điều khiển biểu mẫu (chẳng hạn như điều khiển dữ liệu dạng bảng).

Tôi có một bảng trong Excel với số hàng và cột có thể thay đổi. Tôi muốn hiển thị dữ liệu này trên một biểu mẫu VB bằng cách sử dụng một loại điều khiển dữ liệu dạng bảng nào đó. Nếu có điều khiển như vậy, tôi rất mong nhận được mã tương ứng để điền dữ liệu.

Cảm ơn.

Farooq

Trả lời:

Có lẽ bạn có thể sử dụng ListBox và đặt thuộc tính ColumnCount thành số cột cần thiết. ListBox có thể được điền dữ liệu bằng thuộc tính RowSource.

Private Sub UserForm_Initialize()
Dim MyRng As Range
Đặt MyRng = Worksheets("Sheet1").Range("A1:C10")
Me.ListBox1.ColumnCount = MyRng.Columns.Count
Me.ListBox1.RowSource = MyRng.Parent.Name & "!" & MyRng.Address
'RowSource = Sheet1!A1:C10

End Sub

Trả lời:

Thuộc tính ColumnCount không phải là vấn đề ở đây.

Khi sử dụng ListBox trên bảng tính, chúng ta không có thuộc tính RowSource, mà là thuộc tính ListFillRange!

Sub FillListBox()
Dim MyRng As Range
Đặt MyRng = Worksheets("Sheet1").Range("A1:C10")
Với các trang tính ("Trang tính 1")
.ListBox1.ColumnCount = MyRng.Columns.Count
.ListBox1.ListFillRange = "'" & MyRng.Parent.Name & "'!" & MyRng.Address
Kết thúc bằng
End Sub