ListHeaderCount 属性

优质

小牛编辑

125浏览

2023-12-01

全部显示

返回或设置命令栏组合框控件中出现在分隔行之上的列表项的数目。Long 类型，可读写。

注意对于内置的组合框控件，该属性为只读。

说明

ListHeaderCount 属性值为-1 时表示组合框控件中没有分隔行。

示例

本示例可实现的功能为：在命令栏“Custom”中添加一个组合框控件，然后在该组合框列表中添加两个列表项。并且用ListHeaderCount 属性在组合框的第一项和第二项间显示一分隔行。此外，本示例还设置列表项的行数，组合框的宽度，并将该组合框的默认值设置为空。

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