|
希望通过下面几种方法的介绍，对喜欢用列表框来显示数据的朋友有所帮助！ 不足之处，恳请大家批评指正！
常见的显示数据的方法有以下四种：
第一种：RowSource属性
可以利用该属性将列表框直接与工作表上的一个单元格区域相链接。在该区域中的任何变化将会立即使列表框相应变化，但在列表框中的数据是只读的，你不能对列表框中的数据进行删除或增加操作。这种方法有一点较好的，就是可以设置列标题。 利用该属性，还有以下四种方式可选择： A、直接用工作表区域 Private Sub UserForm_Initialize()
Dim Erow As Integer
Erow = Worksheets("Columns").Range("A65536").End(xlUp).Row
With Me.ListBox1
.ColumnCount = 3
.BackColor = &HFFFF00
.ColumnHeads = True
.ColumnWidths = "80,50,30"
.RowSource = "Columns!A2:C" & Erow
End With
End Sub 可以显示列标题：如图：
[此贴子已经被作者于2006-11-30 9:50:25编辑过] | 
沪公网安备 31011702000001号 沪ICP备11019229号-2
发表于 2006-11-30 09:45
