combo box in toolbar

  • Thread starter Thread starter Guest
  • Start date Start date
Hi,

The help file on topic Controls provides an example.

Set myControl = CommandBars("Custom").Controls _
.Add(Type:=msoControlComboBox, Before:=1)
With myControl
.AddItem Text:="First Item", Index:=1
.AddItem Text:="Second Item", Index:=2
.DropDownLines = 3
.DropDownWidth = 75
.ListHeaderCount = 0
End With

Cheers
Andy
 
Thanks Andy.

Andy Pope said:
Hi,

The help file on topic Controls provides an example.

Set myControl = CommandBars("Custom").Controls _
.Add(Type:=msoControlComboBox, Before:=1)
With myControl
.AddItem Text:="First Item", Index:=1
.AddItem Text:="Second Item", Index:=2
.DropDownLines = 3
.DropDownWidth = 75
.ListHeaderCount = 0
End With

Cheers
Andy
Click to expand...
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

ListFillRange challenge 6
Help with update query UDF 1
combo box 2
combo box 1
control toolbar combo box and command button 7
width of combo box control on toolbar 1
Combo Box Question 22
Column Comparition/Lookup Problem 1

Back
Top