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

来源:互联网 发布:excel显示数据求和 编辑:程序博客网 时间:2024/06/05 20:42

向列表框中填加数据的方法很多,下面根据实例介绍3种最常用到的方法:

图1

图2
如图1所示的下拉列表框(组合框),图2为其数据源,图2所有在工作表表名为:设置表
无论哪种方法我们都首先要知道最后这个数据所在的行数。如图2的第4行。
 
    Dim l As Long         '表示行数时,应该习惯设成长整型    l = Sheets("设置表").Range("A65536").End(xlUp).Row
 
上述代码请参见《VBA得到EXCEL表格中的行数和列数

方法一:循环Additem

全文阅读