Mots de passe sur chaque nom dans liste déroulante
Bonjour à tous,
Je recherche le moyen d'avoir une liste déroulante avec une demande de mot de passe sur chaque nom de la liste.
Concrètement, c'est une liste de nom où la personne sélectionne sont nom dans la liste et entre le mot de passe demandé pour le nom sélectionne.
Exemple, dans la liste déroulante de prénom, le mot de passe associé :
Harry MDP : 12345
Paul MDP : 1a2b3c
Jaques MDP : abcdef
J'ai essayer ce code, mais celui-ci ne demande qu'un seul mot de passe pour toute la liste.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([B2:B2], Target) Is Nothing And Target.Count = 1 Then
mp = InputBox("Entrez votre mot de passe : ")
If mp <> "leMDP" Then
Application.EnableEvents = False
Application.Undo
Application.EnableEvents = True
MsgBox "Annulé"
End If
End If
End Sub
Merci d'avance pour votre aide
Bonjour,
Regarde sur ce lien, tu devrais trouver ton bonheur
Merci pour ta réponse.
Cependant, je ne souhaite pas que cela mène sur d'autres feuilles cachées, mais uniquement que la liste deroulante affiche le nom sélectionner dans la liste. Je ne sais pas comment m'y prendre
Re,
OK, mais la finalité de demande du Mdp sert à quoi ??
A ce que le nom de la personne soit écrit dans la cellule ou ce trouve la liste, sans possibilité d'être modifié par une autre personne travaillant sur le même document.
C'est pour un document de travail, qui sert à justifier de qui a effectué quelle tâche.
Super nickel, c'est ce qui me fallait.
Merci beaucoup.