Propiedad DropDownLines
Devuelve o establece el número de líneas del control de cuadro combinado de la barra de comandos especificada. El control de cuadro combinado debe ser un control personalizado y debe ser cuadro de lista emergente o un cuadro combinado. Long de Lectura/Escritura.
Nota Este método fallará si la propiedad se establece para un control de cuadro combinado que sea un control de cuadro de edición o de cuadro combinado integrado.
Comentarios
Si esta propiedad se establece en 0 (cero), el número de líneas de control se basará en el número de elementos de la lista.
Ejemplo
Este ejemplo agrega un control de cuadro combinado a la barra de comandos denominada "Custom" y, a continuación, agrega dos elementos a la lista del cuadro combinado. El ejemplo también establece el número de elementos de línea, el ancho del cuadro combinado y un valor vacío predeterminado para el cuadro combinado.
Set myBar = CommandBars("Custom")
Set myControl = myBar.Controls.Add(Type:=msoControlComboBox, Id:=1)
With myControl
.AddItem Text:="First Item", Index:=1
.AddItem "Second Item", 2
.DropDownLines = 3
.DropDownWidth = 75
.ListHeaderCount = 0
End With