MAC - Vérrouiller une cellule en VBA si case à cocher = VRAI

Bonsoir à tous,

Tout est dans le titre !

La macro ci-dessous ne fonctionne pas... pourtant je ne vois pas d'erreur

J'ai aussi essayer avec "Worksheet_Change(ByVal Target As Range)" mais sans résultat...

Si quelqu'un a une petite idée slvp...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' Macro qui permet de Verrouiller/Déverrouiller une cellule en fonction de la valeur d'une autre cellule !

    If Range("F6").Value = VRAI Then '"F6" correspond à la cellule liée à la case à cocher...

                ActiveSheet.Unprotect "MotDePasse"

                Worksheets("Impôt").Range("C7").Locked = True

    ElseIf Range("F6").Value = FAUX Then

                ActiveSheet.Unprotect "MotDePasse"

                Worksheets("Impôt").Range("C7").Locked = False

    Else
                ActiveSheet.Unprotect "MotDePasse"

                Worksheets("Impôt").Range("C7").Locked = False

    End If

    ActiveSheet.Protect "MotDePasse", _
                    DrawingObjects:=True, _
                    Contents:=True, Scenarios:=True, _
                    UserInterfaceOnly:=True

End Sub

Je joint aussi le fichier :

Bonjour

A vérifier

Bonsoir Banzai64,

Merci ! Ca fonctionne très bien !

A+