Checkbox qui ne répond pas

Bonjour à tous,

Je suis sur un formulaire et ma checkbox ne fonctionne pas. (voir code ci-dessous)

Sachant que "LI" correspond à la ligne de mon tableau que j'utilise.

Si un âme charitéble pouvait m'aider =)

Merci d'avance =)

Micka

Private Sub ChkQ01_Click()
    'CONCERNÉ/NON-CONCERNÉ 01
    Worksheets("Base").Cells(LI, "DH").Value = Me.ChkB01.Value
        If ChkB01.Value = True Then
        Range(LI, "DH") = "NC"
    Else
        Range(LI, "DH") = "C"
    End If
End Sub

Bonjour,

est ce que ça fonctionne en indiquant la feuille,

Private Sub ChkQ01_Click()
    'CONCERNÉ/NON-CONCERNÉ 01
    Worksheets("Base").Cells(LI, "DH").Value = Me.ChkB01.Value
        If ChkB01.Value = True Then
        Worksheets("Base").Cells(LI, "DH") = "NC"
    Else
        Worksheets("Base").Cells(LI, "DH") = "C"
    End If
End Sub

Merci pour ton aide i20100 mais ça ne fonctionne pas non plus.

Bonjour à tous,

Ceci Range(LI, "DH") = "NC" ne peut pas fonctionner, car pour un range, c'est colonne puis ligne.

Si tu écris ligne puis colonne, il faut utiliser Cells > Worksheets("Base").Cells(LI, "DH") = "NC"

Ou écrire ainsi : Worksheets("Base").Range("DH" & LI) = "NC"

ric