Changer le texte d'une checkbox

Bonjour,

Pour valider un travail j'utilise une checkbox et je modifie son texte avec une macro selon sa valeur :

If CheckBox4.Value = 0 Then

Selection.Characters.Text = "NOK"

Else

Selection.Characters.Text = "OK"

End If

End Sub

le problème c'est qu'une erreur s'affiche : "objet requis"

Pouvez -vous s'il vous plait m'aider pour ce petit sujet qui doit etre simple, mais je débute en VBA

Merci

Bonjour. Bienvenue sur le Forum

Code CheckBox

Private Sub CheckBox4_Click()
If CheckBox4.Value = 0 Then
CheckBox4.Caption = "NOK"
Else
CheckBox4.Caption = "OK"
End If
End Sub

Cordialement

Merci beaucoup , sa marche a merveille !!!!!