Propiedad Height
Devuelve o establece el alto del control de la barra de comandos o de la barra de comandos. Long de Lectura/Escritura.
expresión.Height
expresión Requerida. Expresión que devuelve uno de los objetos anteriores.
Ejemplo
Este ejemplo agrega un control personalizado a la barra de comandos denominada Custom. El ejemplo establece el alto del control personalizado en el doble del alto de la barra de comandos y 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