用VBA向列表框(ComboBox或ListBox)中填加数据

向列表框中填加 数据的方法很多，下面根据 实例介绍3种最常用到的方法： 图1 图2 如图1所示的 下拉列表框（组合框），图2为其数据源，图2所有在工作表表名为：设置表 无论哪种方法我们都首先要知道最后这个数据所在的行数。如图2的第4行。   Dim l As Long '表示行数时，应该习惯设成长整型 l = Sheets("设置表").Range("A65536").End(xlUp).Row   上述代码请参见《 用VBA得到EXCEL表格中的行数和列数》 方法一：循环Additem 全文阅读