Headings for Excel Combobox

[LW]

I am using Excel97.
I have a 2 column combobox set to dropdown List style. How do I setup the column Headings from code?

 

[acron]

Just use

Me.ComboBox1.ColumnHeads = True

and it will automatically pick the headers from the cells above the RowSource range, or the Column titles (A,B etc) if the rows start at 1.

A.C.

 

[LSTAN]

Hi

just set the ColumnHeads to True, here is how

With Me.ComboBox1
.ColumnCount = 2
.ColumnHeads = True
End With

Hope this helps.

LSTAN

 

[LW]

acron Thanks for the quick response.
I am using the following to populate the combobox and not a range:

combo1.additem ""
combo1.List(0,0)="Col1 Item"
combo1.additem ""
combo1.List(0,1)="Col2 Item"

Actually I'm pulling the items from variables but I'm sure you get my point.

 

[LW]

acron & LSTAN
I just tried your code. It works great. Thanks Guys!

 

[AncientTiger]

Ok, but what if I'm using a 2-dimensional array, and not a sheet range? How could I programatically SET the column heading's text?

 

[AncientTiger]

ALSO, is there a way to activate a HORIZONTAL scroll bar in a list box?

Thx
AT

 

[AncientTiger]

Ok, figured out the horizontal scrollbar (just increase the column widths), but STILL can't find a way to programatically set the column headings......

Anyone???