Метод CommandBarButton.Move (Office)

Статья
04/07/2023

Перемещает указанный элемент управления CommandBarButton на существующую панель команд.

Примечание.

Использование CommandBars в некоторых приложениях Microsoft Office было заменено новым компонентом ленты пользовательского интерфейса Microsoft Office Fluent. Дополнительные сведения см. в статье Обзор ленты Office Fluent.

Синтаксис

expression. Move(Bar, Before)

выражение (обязательно). Переменная, представляющая объект CommandBarButton .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Bar	Необязательный	Variant	Объект Command , представляющий целевую панель команд для элемента управления . Если этот аргумент опущен, элемент управления перемещается в конец панели команд, где сейчас находится элемент управления.
До	Необязательный	Variant	Число, указывающее положение элемента управления. Элемент управления вставляется перед элементом управления, который в настоящее время занимает эту позицию. Если этот аргумент опущен, элемент управления вставляется на ту же панель команд.

Пример

В этом примере первый элемент управления поле со списком на панели команд с именем Custom перемещается в положение перед седьмым элементом управления на этой панели команд. В этом примере тегу присваивается поле Selection и элементу управления присваивается низкий приоритет, чтобы он, скорее всего, был удален с панели команд, если все элементы управления не помещаются в одну строку.

Set allcontrols = CommandBars("Custom").Controls 
For Each ctrl In allControls 
    If ctrl.Type = msoControlComboBox Then 
        With ctrl 
            .Move Before:=7 
             .Tag = "Selection box" 
             .Priority = 5 
         End With 
         Exit For 
    End If 
Next

См. также

Элементы объекта CommandBarButton

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через