Propiedad CommandBarControl.Height (Office)

Obtiene o establece el alto de un control CommandBarControl. Lectura y escritura.

Nota:

El uso de CommandBars en algunas aplicaciones de Microsoft Office sustituido por el nuevo componente cinta de la interfaz de usuario de Microsoft Office Fluent. Para obtener más información, vea Información general sobre la cinta de Office Fluent.

Sintaxis

más sencilla.Altura

expresión Variable que representa un objeto CommandBarControl .

Valor devuelto

Entero

Ejemplo

En este ejemplo se agrega un control personalizado a la barra de comandos denominado Personalizado. En el ejemplo se establece la altura del control personalizado en el doble de la altura de la barra de comandos y se establece el ancho del control en 50 píxeles. Observe cómo la barra de comandos cambia su tamaño de forma automática para adaptarlo al control.

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

Vea también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.