Returns the number of entries in a list box or combo box. Returns 0 (zero) if there are no entries in the list. Read-only Long.
Example
This example adjusts a combo box to display all entries in its list. If Shapes(1) does not represent a combo box, this example fails.
Set cf = Worksheets(1).Shapes(1).ControlFormat
cf.DropDownLines = cf.ListCount