您可以通过下面所介绍的三种方式为列表框获取数据。
RowSource属性
您能将列表框直接与工作表上的一个单元格区域相链接,这与工作表中的列表框相同。在该区域中的任何变化将会立即使列表框相应变化,但在列表框中的数据是只读的,您不能通过改变列表框中的项目来改变工作表中的内容。
Note that the parameter for RowSource is a string and not a range:
注意,RowSource参数是一个字符串,而不是一个单元格区域:
--------------------------------------------------------------------------------
lstNames.RowSource = Range("Names").Address
--------------------------------------------------------------------------------
List属性 / Column属性
您能使用List属性和Column属性来设置列表项目,这两个属性除了方向不同外,实质上是相同的。List属性的语法为:List(行,列);Column属性的语法为:Column(column,row)。您能复制整个数组到列表框中,或者只是在列表框中设置单个的项目。
--------------------------------------------------------------------------------
lstNames.List = Range("Names").Value
--------------------------------------------------------------------------------
AddItem方法
AddItem方法在列表框中添加一行,并且您能放置一个值在新行的第一列中。在多列列表框中,您必须使用List属性或Column属性放置值在剩下的列中。
--------------------------------------------------------------------------------
With lstNames
.Additem
.List(0, 0) = "John"
.List(0, 1) = "Smith"
End With
--------------------------------------------------------------------------------