Index 属性

       

返回集合中指定对象的索引号。Long 类型，只读。

expression.Index

expression   必需。该表达式返回“应用于”列表中的对象之一。

说明

第一个命令栏控件的位置为 1。CommandBarControls 集合中的分隔符不算在内。

示例

本示例可实现的功能为：在命令栏“Custom2”中搜索 ID 值为 23 的控件。如果能找到这样的控件，并且其索引号大于 5，那么该控件将放置在命令栏的第一个位置上。

Set myBar = CommandBars("Custom2")
Set ctrl1 = myBar.FindControl(Id:=23)
If ctrl1.Index > 5 Then
    ctrl1.Move before:=1
End If