Protection d'une cellule suivant condition

Bonjour à tous,

J'ai réalisé une feuille de calcul sous Excel (2010), dans laquelle l'utilisateur rentre des données. Pour éviter qu'il ne modifie malencontreusement la feuille j'ai verrouillé celle-ci en laissant libre les cellules à remplir. Jusque là rien de bien compliqué.

Là où je ne sais pas comment m'y prendre, c'est pour libérer les cellules à remplir suivant certaines conditions.

Ex :

Si A1 = 1 alors la cellule B1 est libre.

Si A1=2 alors les cellules B1 et B2 sont libres.

J'ai trouvé en parcourant votre forum que semble-t-il la fonction "validation de données" devrait pouvoir servir, mais je n'ai pas réussi à lui faire faire quelque chose.

Avez vous une solution simple à me proposer ?

Merci d'avance

Bonjour,

Essaye ce code dans le module de la feuille concernée :

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1")) Is Nothing Then
        If Target = 1 Then
            Range("B1").Locked = False
            Range("B2").Locked = True
        ElseIf Target = 2 Then
            Range("B1,B2").Locked = False
        Else
            Range("B1,B2").Locked = True
        End If
    End If
End Sub