Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel mot de passe avec *****

mot de passe avec *****

3 réponses
Avatar
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
-----
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jacky
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" a écrit dans le message de
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
-----


Avatar
Sunburn
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" a écrit dans le message de
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
> -----






Avatar
JPMonnier
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

a écrit dans le message de
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
-----