Vba : Mot de Passe = Caption d'un Texbox ?

noviceAG · 5 Février 2010

Bonjour le Forum,
A l’ouverture du classeur, clic sur bouton m’affiche un Usf demandant le mot de passe qui affiche alors les divers boutons de commande (demandé par la personne pour qui je fais ce fichier). Cette même personne ne veut pas que le mot de passe apparaisse « en clair » dans le code Vba ou ailleurs et me dit que c’est possible avec un Texbox en récupérant l’élément caption.

Pouvez-vous me dire si ceci est exact et comment procéder et un fichier exemple serait apprécié.
En vous remerciant par avance.

noviceAG · 5 Février 2010

Re : Vba : Mot de Passe = Caption d'un Texbox ?

Bonsoir Jean-Marcel,
Je te remercie du classeur joint que je vais regarder plus tard
En te souhaitant une bonne soirée

noviceAG · 5 Février 2010

Re : Vba : Mot de Passe = Caption d'un Texbox ?

Re,
Je viens de prendre connaissance du fichier et ce n'est pas exactement ce que je souhaite.
Il semblerait que seul un listbox a un évènement Caption.

Aussi ma question est :
Est-il possible de comparer la saisi dans un Texbox avec le nom (Caption) de la listbox du genre :

si la valeur saisi dans le texbox est identique au nom (caption) de la listbox
Si Ok alors : mon code ....
En te remerciant et te souhaitant une bonne soirée.

Fo_rum · 5 Février 2010

Re : Vba : Mot de Passe = Caption d'un Texbox ?

Salutvices

On peut toujours espérer ... mais le bricoleur, un tant soit peu imaginatif, trouvera toujours !
Pour les novices qui se contentent de regarder ...

Fo_rum · 5 Février 2010

Re : Vba : Mot de Passe = Caption d'un Texbox ?

Re quin quin

tu ne fais pas partie des

... novices qui se contentent de regarder ...

noviceAG · 6 Février 2010

Re : Vba : Mot de Passe = Caption d'un Texbox ?

Bonjour et merci à tous pour votre aide appréciée
en vous souhaitant un bon WE

jp14 · 6 Février 2010

Re : Vba : Mot de Passe = Caption d'un Texbox ?

Bonjour

Ci joint un fichier avec deux macros une pour générer des codes (à modifier), la deuxième pour tester le mot de passe.

Le contrôle du mot de passe se fait par la fonction logique XOR avec un traitement sur mot de 8 bits, en vérifiant si le message chiffré et égal au mot de passe chiffré.
Le mot de passe n'est pas enregistré dans la macro.

Fonction OU exclusif - Wikipédia
"Exemple d'utilisation en cryptographie "

La procédure peut être modifiée pour créer un code, par exemple en utilisant un générateur aléatoire (valeur maxi 255 code sur 8 bits) au lieu d'une addition (10+2*i).

Attention si on n'a pas le mot de passe la boucle est mortelle.

A tester

fhoest · 6 Février 2010

Re : Vba : Mot de Passe = Caption d'un Texbox ?

bonsoir a tous ,
je pense avoir ce que tu souhaite
voici le code:

Code:

'Sauvegarde le contenu des TextBox lors de la fermeture du UserForm
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
SaveSetting "Mes parametres", "TextBox1", "Valeur TextBox1", TextBox1.Value
SaveSetting "Mes parametres", "Textbox2", "Valeur TextBox2", TextBox2.Value
End Sub

 
'Récupère la valeur de la clé lors de l'ouverture du UserForm
Private Sub UserForm_Initialize()
TextBox1.Value = GetSetting("Mes parametres", "TextBox1", "Valeur TextBox1")
TextBox2.Value = GetSetting("Mes parametres", "TextBox2", "Valeur TextBox2")
End Sub

@+

Vba : Mot de Passe = Caption d'un Texbox ?

noviceAG

XLDnaute Impliqué

noviceAG

XLDnaute Impliqué

noviceAG

XLDnaute Impliqué

Fo_rum

XLDnaute Accro

Pièces jointes

Fo_rum

XLDnaute Accro

noviceAG

XLDnaute Impliqué

jp14

XLDnaute Barbatruc

Pièces jointes

fhoest

XLDnaute Accro

Discussions similaires