多列列表框VBA中的“合并单元格”

时间:2016-02-28 20:19:12

标签: excel-vba listbox vba excel

我想使用多列列表框来显示数据列表。列表的总长度是动态的,因此列表框似乎适合我。

在前几行中,我想提供一些描述性信息。

我的问题是某些字符串会比列宽更长,因此不会完全显示。即使第一行的某些列是空的。有没有办法“合并细胞”或什么?

Private Sub UserForm_Initialize() 
Me.lbFluidValues.Clear 
Me.lbFluidValues.ColumnCount = 10 
Me.lbFluidValues.ColumnWidths = "40;40;40;40;40;40;40;40;40;40" 
For i = 1 To 9 
    lbFluidValues.AddItem 
Next i 'assing values to the columns 
For i = 10 To 18 
    lbFluidValues.AddItem
    lbFluidValues.List(i - 1, 0) = i  
    lbFluidValues.List(i - 1, 1) = i * 10 
    lbFluidValues.List(i - 1, 2) = i * 100 
    lbFluidValues.List(i - 1, 3) = i * 1000 
Next i 
lbFluidValues.List(1, 1) = "a very long string doesn't fit here" 
End Sub

0 个答案:

没有答案