Help With a Simple Code Please!

[lovett10]

[vba]Dim cbo As OLEObject
Dim ws As Worksheet
Set ws = Worksheets("Boiler")
If OLEObjects("ComboBox1").Object.Value = "Boiler4" Then
Set OLEObjects("CheckBox2").Object.Value = True
Else
Set OLEObjects("CheckBox2").Object.Value = False
End If[/vba]

Can you tell me whats wrong and how to fix it please, i am trying to make it so that when ComboBox1 says "Boiler4" the checkbox autommatically ticks itself.

thanks in advance

test.xlsm