Verouillage en fonction valeur dans la cellule

bonjour

je souhaiterai savoir comment protéger une cellule en fonction de la valeur a l'intérieur

sur mon fichier en pièce jointe je souhaiterai que lorsqu'une cellule a le texte NE elle se verrouille automatiquement sauf pour l'onglet liste de tp

merci par avance


avec le fichier c mieux

18grille-vierge.xlsm (215.98 Ko)

Salut je ne connais pas ton niveau en vba mais voilà déjà un début

Ton classeur est trop complexe et on ne sais pas ou tu veux contrôler la condition donc voici un exemple :

On considère que tes cellules de ta feuille ne sont pas protégées et que ton mot de passe de ta feuille est "a"

Coller le code dans la feuille (clique droit et visualiser le code) :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If ActiveCell = "NE" Then ' si la cellule est égale à NE exécuter le code qui suit :
            ActiveSheet.Unprotect Password:="a" 'déprotège la feuille
                    ActiveCell.Select
                    Selection.Locked = True ' verrouille la cellule
            ActiveSheet.Protect Password:="a"  'protège la feuille

    Else 'si la cellule n'est pas égale à NE ne rien faire

End If 'fin de la condition

End Sub

Si tu veux télécharger :

sedit : Si tu souhaites que personne ne voit le mot de passe dans ce code il te suffira de mettre une mot passe sur le code vba (priorité/protection)

je te remercie la le code c'est a si je comprend bien

Exact

je te remercie

Rechercher des sujets similaires à "verouillage fonction valeur"