I have created a number of comboboxes that are created when a command button is pressed.

i used the following code to create the boxes

Dim UCLpar As Object

Set UCLpar = ActiveSheet.OLEObjects.Add _
(ClassType:="Forms.ComboBox.1", _
Link:=False, _
DisplayAsIcon:=False, _
Left:=782.25, _
Top:=170, _
Width:=45, _
Height:=18.75)

ok now this works fine except when i try to add code after this using the .additem and .value = "" to populate the combobox i get an error.

Run-time error '438':

Object doesnt support this property or method

when i populate using the dropbuttonclick event it works ok. this isnt going to work for me as the worksheet and comboboxes are created at runtime.