AddFormControl Method [Excel 2003 VBA Language Reference]

Creates a Microsoft Excel control. Returns a Shape object that represents the new control.

expression**.AddFormControl(Type**, Left, Top, Width, Height)

expression Required. An expression that returns one of the objects in the Applies To list.

XlFormControl

XlFormControl can be one of these XlFormControl constants.

xlButtonControl

xlCheckBox

xlDropDown

xlEditBox

xlGroupBox

xlLabel

xlListBox

xlOptionButton

xlScrollBar

xlSpinner

Left Required Long. The initial coordinates of the new object (in points) relative to the upper-left corner of cell A1 on a worksheet or to the upper-left corner of a chart.

Top Required Long. The initial coordinates of the new object (in points) relative to the upper-left corner of cell A1 on a worksheet or to the upper-left corner of a chart.

Width Required Long. The initial size of the new object, in points.

Height Required Long. The initial size of the new object, in points.

Remarks

Use the AddOLEObject method or the Add method of the OLEObjects collection to create an ActiveX control.

Example

This example adds a list box to worksheet one and sets the fill range for the list box.

With Worksheets(1)
    Set lb = .Shapes.AddFormControl(xlListBox, 100, 10, 100, 100)
    lb.ControlFormat.ListFillRange = "A1:A10"
End With

Applies to | Shapes Collection