Directly applying Check Box:
Sub LinkChecklist()
Dim chk As CheckBox
For Each chk In ActiveSheet.CheckBoxes
chk.LinkedCell = chk.TopLeftCell.Offset(0, -1).Address
Next
End Sub
Conditional Formating the check Box
=AND($D1=”Contract”,$N$11)
i.e. if D column value is contract and n11 is true all color becomes same