Index Property

Returns a Long representing the index number for an object in the collection. Read-only.

expression.Index

*expression   * Required. An expression that returns one of the objects in the Applies To list.

Remarks

The position of the first command bar control is 1. Separators are not counted in the CommandBarControls collection.

Example

This example searches the command bar named "Custom2" for a control with an Id value of 23. If such a control is found and the index number of the control is greater than 5, the control will be positioned as the first control on the command bar.

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

Applies to | CommandBar Object | CommandBarButton Object | CommandBarComboBox Object | CommandBarControl Object | CommandBarPopup Object | DocumentLibraryVersion Object | ODSOColumn Object | ODSOFilter Object