Programming Excel with VBA and .NET

Name

control.ColumnWidths [= setting]

Synopsis

Sets or returns the width of list columns in points. Use a semicolon to specify different widths for each column, as shown here:

Private Sub UserForm_Initialize(  )
    Dim rng As Range
    ComboBox1.ColumnCount = 3
    Set rng = Worksheets("DataForm").UsedRange
    ComboBox1.RowSource = rng.Address
    ComboBox1.ColumnWidths = "30;20;40"
End Sub