Excel - Conditionner protection cellule

rm8893 -  
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je souhaiterai protéger certaines cellules en fonction du contenu d'une autre ?

Merci de vos conseils.
Configuration: Windows XP
Internet Explorer 6.0

1 réponse

  1. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Salut,
    En VBA si tu domines, dans l'exemple ci-dessous, en suposant que ta feuille de calcul est protégée par un mot de passe exemple titi,
    si la cellule C10 contient 10 alors la feuille est déprotégée et la cellule G10 déverrouillée et la feuille est reprotégée avec le mot de passe

    Sub Macro1()
    Worksheets(1).Unprotect Password:="titi"

    If Range("C10") = 10 Then
    Range("G10").Select
    Selection.Locked = False
    Selection.FormulaHidden = False

    Worksheets(1).Protect Password:="titi"
    End If
    End Sub

    A+
    -2