mot de passe avec *****

Le
Sunburn
Bonjour,
je souhaite mettre un mot de passe pour acceder à une macro, lorsque je clic
sur un bouton de ma barre d'outil. j'ai réussi, mais le mot de passe est
visible à l'écran quand je le tape.
Comment faire pour que ce soit des **** ou autre chose qui apparraisse lors
de la saisie??
Merci.
YANN
-
pw = InputBox("Entrer le mot de passe")
If pw = "toto" Then
Else
MsgBox ("Désolé"), vbCritical, "Mauvais mot de passe"
End If
--
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Jacky
Le #18152441
Bonjour,

A ma connaissance cela n'est pas possible avec un inputbox et implique un
userform
Regarde ici
http://boisgontierjacques.free.fr/fichiers/Formulaire/Form_MotPasse.xls
--
Salutations
JJ


"Sunburn" news:
Bonjour,
je souhaite mettre un mot de passe pour acceder à une macro, lorsque je
clic
sur un bouton de ma barre d'outil. j'ai réussi, mais le mot de passe est
visible à l'écran quand je le tape.
Comment faire pour que ce soit des **** ou autre chose qui apparraisse
lors
de la saisie??
Merci.
YANN
----
pw = InputBox("Entrer le mot de passe")
If pw = "toto" Then
Else
MsgBox ("Désolé"), vbCritical, "Mauvais mot de passe"
End If
-----


Sunburn
Le #18152851
Ok, c'est impecable, ça me va super.
YANN

"Jacky" a écrit :

Bonjour,

A ma connaissance cela n'est pas possible avec un inputbox et implique un
userform
Regarde ici
http://boisgontierjacques.free.fr/fichiers/Formulaire/Form_MotPasse.xls
--
Salutations
JJ


"Sunburn" news:
> Bonjour,
> je souhaite mettre un mot de passe pour acceder à une macro, lorsque je
> clic
> sur un bouton de ma barre d'outil. j'ai réussi, mais le mot de passe est
> visible à l'écran quand je le tape.
> Comment faire pour que ce soit des **** ou autre chose qui apparraisse
> lors
> de la saisie??
> Merci.
> YANN
> ----
> pw = InputBox("Entrer le mot de passe")
> If pw = "toto" Then
> Else
> MsgBox ("Désolé"), vbCritical, "Mauvais mot de passe"
> End If
> -----






JPMonnier
Le #18153081
Bonjour,
Tu vas dans excelabo
tu choisis accueil
hit parade
tu recherches Monnier (535ème je crois) et tu télécharges l'exemple
--
Cordialement

news:
Bonjour,
je souhaite mettre un mot de passe pour acceder à une macro, lorsque je
clic
sur un bouton de ma barre d'outil. j'ai réussi, mais le mot de passe est
visible à l'écran quand je le tape.
Comment faire pour que ce soit des **** ou autre chose qui apparraisse
lors
de la saisie??
Merci.
YANN
----
pw = InputBox("Entrer le mot de passe")
If pw = "toto" Then
Else
MsgBox ("Désolé"), vbCritical, "Mauvais mot de passe"
End If
-----


Publicité
Poster une réponse
Anonyme