全部显示

DropDownWidth 属性

       

返回或设置指定命令栏组合框控件的列表宽度(以像素为单位)。Long 类型,可读写。

注意   如果为内置的组合框控件设置该属性,则会出现错误。

说明

如果该属性设置为 -1,那么将根据组合框列表中最长的选项设置列表的宽度。如果该属性设置为 0,那么系统会根据控件的宽度设置列表的宽度。

示例

本示例可实现的功能为:在命令栏“Custom”中添加一个内含两个选项的组合框控件。本示例还设置列表的行数,组合框的宽度,并将该组合框的默认值设置为空。

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