LinkedCell Property Example

This example adds a check box to worksheet one and links the check box value to cell A1.

With Worksheets(1)
    Set cb = .Shapes.AddFormControl(xlCheckBox, 10, 10, 100, 10)
    cb.ControlFormat.LinkedCell = "A1"
End With