您可以通过下面所介绍的三种方式为列表框获取数据。
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
--------------------------------------------------------------------------------