ComboBox ListFill Range in Excel 2000

[OzzieTheOwl]

Hi

I have written the following vba in Excel 2000, to fill a ComboBox ListFillRange.

ActiveSheet.Shapes("ComboBox1").ControlFormat.ListFillRange = "Control!$B$2:$B$" & ControlEndB

I am getting the error message

Run-time Error '438'

Object doesn't support this property or method.

Can some enlighten me as to what I am doing wrong?

Cheers

Barney

 

[SkipVought]

Hi,

How to use the Watch Window as a Power Programming Tool faq707-4594

Skip,
[sub]
[red][/red]
[/sub]

 

[combo]

For Forms combobox:
...Shapes("ComboBox1").OLEFormat.Object.ListFillRange =...

For activex combobox (control toolbox):
....Shapes("ComboBox1").ControlFormat.ListFillRange =

combo

 

[combo]

A typo above, should be OLEFormat for activex controls, ControlFormat for 'forms' controls.

combo