ops, scusami, non avevo ben notato che le tue checkbox fossero disposte su un foglio Excel.
In tal caso, i controlli vanno a far parte della collection Shapes, quindi è quella che devi ciclare sia per rilevare il nome del controllo, sia per impostarne il valore:
codice:Dim sh As Shape For Each sh In Foglio1.Shapes If sh.Type = msoFormControl Then If sh.FormControlType = xlCheckBox Then Debug.Print sh.Name 'Qui posso rilevare il nome sh.ControlFormat.Value = 1 '1-Vero - 0-Falso End If End If Next shBoolean