Change value of combobox

[VegasNath]

I have tried using the macro recorder to change the value of a combobox without success.

wb0.Sheets("Report").OLEObjects.ComboBox1.Value = Format(strDate, "dd mmmm yyyy")

Can anyone see where am I going wrong with my syntax?

[HansV]

Does this work?

wb0.Sheets("Report").OLEObjects("ComboBox1").Value = Format(strDate, "dd mmmm yyyy")

[VegasNath]

No.
It's a combo box from the control toolbox.

[HansV]

Sorry, forgot an essential part:

wb0.Sheets("Report").OLEObjects("ComboBox1").Object.Value = Format(strDate, "dd mmmm yyyy")

[VegasNath]

Great, Thanks Hans