Office VBA教程:AddItem方法

在 指定命令栏组合框控件中添加一个列表项。该组合框控件必须是自定义控件,并且必须是下拉式列表框或组合框。

注意   该方法不能用于编辑框或内置的组合框控件。

expression.AddItem(Text, Index)

expression   必需。该表达式返回一个 CommandBarComboBox对象。

Text   String 类型,必需。要添加到指定控件中的文字。

Index   Variant 类型,可选。指定项在列表各项中的位置。如果省略此参数,指定项将添加在列表的末尾。

VBA示例

本示例可实现的功能为:在命令栏中添加一个组合框控件,然后在该列表中添加两个选项。本示例还设置列表的行数和组合框的宽度。


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

上页:Office VBA教程:Add方法 下页:Office VBA教程:AddToSearchFolders方法

Office VBA教程:AddItem方法

Office VBA教程:AddToSearchFolders方法 Office VBA教程:ApplyFilter方法
Office VBA教程:Clear方法 Office VBA教程:ClearFileList方法
Office VBA教程:Close方法 Office VBA教程:Commit方法
Office VBA教程:Copy方法 Office VBA教程:CopyFace方法
Office VBA教程:Delete方法 Office VBA教程:DoAlert方法
Office VBA教程:EndWizard方法 Office VBA教程:Execute方法
Office VBA教程:FindControl方法 Office VBA教程:FindControls方法
Office VBA教程:Help方法 Office VBA教程:Item方法
Office VBA教程:LoadFromFile方法 Office VBA教程:Move方法
Office VBA教程:NewSearch方法 Office VBA教程:Open方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号