set/get value of checkbox (controltoolbox)

[Jesper F]

Trying to get/set value from a checkbox.
I'm using the controltoolbox-checkbox.
I'm using:
Worksheets("refdata").Shapes(varname).ControlFormat.Value = 1

but getting a object does not support property error.
I need to refer to the checkbox with "varname" being af changable variable.

What is the correct syntax?
Thanks.

 

[Dave Peterson]

I'd use something like:

Option Explicit
Sub testme()
Dim CBX As OLEObject
Set CBX = Worksheets("sheet1").OLEObjects("checkbox1")

CBX.Object.Value = True

End Sub