Свойство CommandBarControl.Height (Office)

Статья
04/07/2023

Возвращает или задает высоту элемента управления CommandBarControl . Для чтения и записи.

Примечание.

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

Синтаксис

expression. Высота

Выражение Переменная, представляющая объект CommandBarControl .

Возвращаемое значение

Целое число

Пример

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

Set myBar = CommandBars("Custom") 
barHeight = myBar.Height 
Set myControl = myBar.Controls _ 
    .Add(Type:=msoControlButton, _ 
    Id:= CommandBars("Standard").Controls("Save").Id, _ 
     Temporary:=True) 
With myControl 
    .Height = barHeight * 2 
    .Width = 50 
End With 
myBar.Visible = True

См. также

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

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

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

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