Display/Show Column Headings In ListBox Or ComboBox
Jun 13, 2008Im trying to add coloumn heads to my listbox but its just not working
i was using rowsource to use the first row of the sheet as the headings however this just set the values in the listbox to the rowsource. Here is my code
If Area = "" Then
Dim c As Range
Zip = "*" + Zip + "*"
Me.ListBox1.Clear
For Each c In Range([e2], [e65000].End(xlUp))
If UCase(c) Like UCase(Zip) Then
With Me.ListBox1
.AddItem c
.List(.ListCount - 1, 0) = c.Offset(0, -4).Value
.List(.ListCount - 1, 1) = c.Offset(0, -3).Value
.List(.ListCount - 1, 2) = c.Offset(0, -2).Value.....................