文档介绍：多列组合框和列表框的设置多列组合框和列表框添加列表项如果组合框和列表框是多列的话,除了使用Error!,还需要设置控件的其他属性,如下面的代码所示。#001PrivateSubUserForm_Initialize()#002DimiRowAsInteger#003DimArrAsVariant#004iRow=("A65536").End(xlUp).Row#005Arr=("A1:G"&iRow)##=7#="45,45,45,45,45,30,45"#=1#=(Arr)#011EndWith#012EndSub代码解析:在窗体初始化时为多列列表框添加列表项。第4行代码,设置列表框显示的列数。ColumnCount属性指定列表框或组合框的显示列数,语法如下:[=Long]参数object是必需的,一个有效的对象。参数Long是可选的,指定需显示的列数。如果将ColumnCount设为-1,将显示所有列。第8行代码,设置列表框各列的宽度。ColumnWidths属性指定多列的组合框或列表框中的各列的宽度,语法如下:[=String]参数object是必需的,一个有效的对象。参数String是可选的,以磅为单位设置列的宽度。如将ColumnWidths属性设为-1或空,则将控件宽度等分,给予列表中的各列。设为0则隐藏该列,大于0的数值则是该列的精确宽度值。若要指定另一种不同的度量单位,设置时必须包括该度量单位。第9行代码,设置多列列表框中的第一列为数据的来源。BoundColumn属性标识多列组合框或列表框中的数据的来源,语法如下:[=Variant]参数object是必需的,一个有效的对象。参数Variant是可选的,标识选择BoundColumn属性值的方法,设置值如表格113 1所示:值说明0将ListIndex属性的值赋予控件。1或者大于1将指定列中的值赋予控件。当采用此属性时,列从1开始计数(默认值)。表格1 1 Variant的设置值当选择了多列列表框的一行时,BoundColumn