Compartilhar via

Propriedade CommandBarControl.Height (Office)

Obtém ou define a altura de um controle CommandBarControl. Leitura/gravação.

Observação

[!OBSERVAçãO] O uso de CommandBars em alguns aplicativos do Microsoft Office foi substituído pelo novo componente da faixa de opções da interface de usuário do Microsoft Office Fluent. Para obter mais informações, consulte Descrição geral do friso do Office Fluent.

Sintaxe

expressão. Altura

expressão Uma variável que representa um objeto CommandBarControl .

Valor de retorno

Número inteiro

Exemplo

Este exemplo adiciona um controlo personalizado à barra de comando com o nome Personalizado. O exemplo define a altura do controlo personalizado para o dobro da altura da barra de comandos e define a largura do controlo para 50 píxeis. Note como a barra de comandos é automaticamente redimensionada para acomodar o controle.

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

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

  • Last updated on