Acrémenter case à cocher vba

Bonjour à tous,
J'ai créer un calendrier excel dans lequel j'ai inséré des cases-à-cocher. Il y en a beaucoup, mais peu importe ça marche !
Quand je coche l'une d'entre elle la case lié m'indique VRAI et si je décoche elle indique FAUX.
Jusque là normal.
Quand je saisi directement dans la cellule liée, la case-à-cochée est cochée, ou non selon se que j'ai saisié dans la cellule liée. Normal j'imagine. C'est justement cette cette propriété que j'aimerai exploité par VBA.
Or quand je renseigne les cellules liées par une action VBA (VRAI/FAUX) la/les cases-à-chochées reste nt dans leur état initial.

Quelqu'un serait-il m'indiquer ce que je dois faire dans ma procédure VBA pour que les cases- à-cochées prenent en considération les modifications

Pour complément; ma procédure VBA:

 Const NBCASE1& = 31 'les lignes du calendrier
 Const NBCASE2& = 12 'les colonnes du calendrier
 Dim COL& 
 Dim LIG&
For COL = 1 To NBCASE2
For LIG = 1 To NBCASE1
If Cells(LIG + 4, COL + 25) = "" Then ' Plage ou ce trouve l'info à traiter
Cells(LIG + 4, COL + 37).Value = "FAUX"  ' Plage de cellule à renseigner par VRAI ou FAUX
Cells(LIG + 4, COL + 37).Interior.Color = RGB(252, 213, 180)
Else
Cells(LIG + 4, COL + 37).Value = "VRAI"
Cells(LIG + 4, COL + 37).Interior.Color = RGB(155, 155, 155)
End If
Next
Next
 End Sub

Merci infiniment pour vos éclairages