ListHeaderCount 属性
优质
小牛编辑
126浏览
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