Application.InputBox >>> Changer le mdp par vba

[KyFranRD]

Bonjour

Ce code permet d’accéder à une interface:


mdp = Application.InputBox("Mot de passe", "Entrer le mot de passe")

If mdp <> "mdp" Then

MsgBox "Mot de passe incorrect", vbCritical

Exit Sub

End If


Je voudrais savoir s'il était possible de permettre un changement de code par l'utilisateur une fois l'inputbox ouverte?

Merci

 

[stefan373]

Re : Application.InputBox >>> Changer le mdp par vba

Bonjour KyFranRD et le forum,

Dans l'état actuel des chose et sans fichier, je dirai que oui sans problème. Il suffit de fermer l'inputbox et d'aller dans le VBA, même sans connaître le mdp. 🙄

A+ Stéfan

 

[sousou]

Re : Application.InputBox >>> Changer le mdp par vba

Bonjour à tous

 

[Robert]

Re : Application.InputBox >>> Changer le mdp par vba

Bonjour le fil, bonjour le forum,

@Sousou, remarquable démonstration...

KyFran je n'ai pas bien compris ta question :
A) tu souhaites savoir comment faire (quel code) pour que l'utilisateur puisse modifier le mot de passe ?
B) tu souhaites savoir si un utilisateur peut modifier le mot de passe ?

A) tu pourrais passer par une UserForm où tu demanderais : ancien mot de passe, nouveau mot de passe et confirmation du nouveau mot de passe...
B) les protections par mots de passe tant des onglets que des codes VBA sont comme les antivols sur les vélos, ils écartent les honnêtes gens et font rires les voleurs...

 

[KyFranRD]

Re : Application.InputBox >>> Changer le mdp par vba

Bonjour bonjour

Hummm J'ai noté >> utilisateur. Donc cela peut être quelqu'un de plus novice que moi en VBA. Si si c'est possible 🙂, chacun son truc.

Je trouverai étrange de verrouiller l’accès, tout en permettant de contourner l'interdiction, partant du principe que la feuille est protégée (impossible d'utiliser le mode design), et que le projet VBA est également verrouillé. Fermer l'inputbox et changer le mdp en VBA, je sais faire. Mais je ne serai pas l'utilisateur du projet. Je tiens donc à laisser la possibilité de changer le mot de passe.

Clic sur bouton >>> demande de mdp sur inputbox avec bouton donnant la possibilité de le changer >>>> clic sur ce bouton >>> ancien mdp >>> 2 fois nouveau mdp >>> msg de confirmation du nouveau mdp.

voili voilou

 

[KyFranRD]

Re : Application.InputBox >>> Changer le mdp par vba

bonjour Robert

Je désire laisser la possibilité au futur utilisateur de changer le mdp

Un userform ce serait pas mal

à ++

 

[sousou]

Re : Application.InputBox >>> Changer le mdp par vba

Re
Petite erreur Robert! mais je rectifie..
Il faut bien sur mémoriser ces mots de passes
Ici une méthode que j'utilise dans des applis avec plusieurs utilisateurs
Listes des agents et de leur mdp dans feuille1 'masquée'

 

[KyFranRD]

Re : Application.InputBox >>> Changer le mdp par vba

merci sousou

Je viens justement decréer ce petit fichier avec possibilité de changer le mdp.

4 userform par contre mais ça marche

je regarde ton fichier

merci