Propriedade CommandBar.Width (Office)

Artigo
04/07/2023

Obtém ou define a largura (em pixels) da barra de comandos especificado. 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 Visão geral da faixa de opções fluente do Office.

Sintaxe

expressão. Largura

Expressão Uma variável que representa um objeto CommandBar .

Valor de retorno

Inteiro

Exemplo

Este exemplo adiciona um controle personalizado à barra de comandos chamada Custom. O exemplo define a altura do controle personalizado como duas vezes a altura da barra de comandos e define sua largura como 50 pixels. 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

Membros do objeto CommandBar

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.

Compartilhar via