ListHeaderCount Property
Applies To
CommandBarComboBox object.
Description
Returns or sets the number of list items in the command bar combo box control that appear above the separator line. Read/write Long.
Note This property is read-only for built-in combo box controls.
Remarks
A ListHeaderCount property value of –1 indicates that there's no separator line in the combo box control.
See Also
Execute method, List property, ListBy property, ListCount property, ListIndex property.
Example
The following example adds a combo box control to the command bar named "Custom," and then it adds two items to the combo box list. The example also sets the number of line items, the width of the combo box, and an empty default for the combo box.
Set myBar = CommandBars("Custom")
Set myControl = myBar.Controls.Add(Type:=msoControlComboBox)
With myControl
.AddItem Text:="First Item", Index:=1
.AddItem Text:="Second Item", Index:=2
.DropDownLines = 3
.DropDownWidth = 75
.ListHeaderCount = 1
End With