Case à cocher : afficher/masquer un champs sur formulaire

Bonjour,

Sur un formulaire, je souhaiterais que la case à cocher et son étiquette s'affichent uniquement dans le cas ou celle-ci est cochée. Ce qui parait simple...

Après quelques recherches sur le forum, voici le code que j'ai saisi :

Private Sub Form_Current()

If Me.Case_à_cocher.Value = True Then
Me.Étiquette_Case_à_cocher.Visible = True
Else
Me.Case_à_cocher.Value = False
Me.Étiquette_Case_à_cocher.Visible = False
End If

End Sub

Ce qui ne fonctionne pas, car ni la case, ni l'étiquette ne s'affichent dans ce cas.

Je vous remercie tous de votre aide.