Si votre email correspond à un compte, vous recevrez un lien de réinitialisation.
Bonjour,Dans une procédure je souhaiterais une saisie du mot de passe, mais nonvisible, ou remplacer chaque caractère par des *.Par exemple à partir la procédureSub test()Dim mdp As Stringmdp = "bonjour"If InputBox("Entrez le mot de passe") = mdp ThenMsgBox ("OK")End IfEnd SubMerci,GGAL
Bonjour, Dans une procédure je souhaiterais une saisie du mot de passe, mais non visible, ou remplacer chaque caractère par des *. Par exemple à partir la procédure Sub test() Dim mdp As String mdp = "bonjour" If InputBox("Entrez le mot de passe") = mdp Then MsgBox ("OK") End If End Sub Merci, GGAL
Bonjour,Utiliser un formulaire. Modifier la propriété PasswordCharPrivate Sub b_ok_Click()If Me.TextBox1 = "toto" ThenMsgBox "ok"Unload MeElseMsgBox "erreur"Me.TextBox1 = ""Me.TextBox1.SetFocusEnd IfEnd Subhttp://boisgontierjacques.free.fr/pages_site/FormulaireMotPasse.htmJBhttp://boisgontierjacques.free.frOn 7 mar, 08:44, GGAL wrote:Bonjour,Dans une procédure je souhaiterais une saisie du mot de passe, mais nonvisible, ou remplacer chaque caractère par des *.Par exemple à partir la procédureSub test()Dim mdp As Stringmdp = "bonjour"If InputBox("Entrez le mot de passe") = mdp ThenMsgBox ("OK")End IfEnd SubMerci,GGAL
Bonjour, Utiliser un formulaire. Modifier la propriété PasswordChar Private Sub b_ok_Click() If Me.TextBox1 = "toto" Then MsgBox "ok" Unload Me Else MsgBox "erreur" Me.TextBox1 = "" Me.TextBox1.SetFocus End If End Sub http://boisgontierjacques.free.fr/pages_site/FormulaireMotPasse.htm JB http://boisgontierjacques.free.fr On 7 mar, 08:44, GGAL <G...@discussions.microsoft.com> wrote: Bonjour, Dans une procédure je souhaiterais une saisie du mot de passe, mais non visible, ou remplacer chaque caractère par des *. Par exemple à partir la procédure Sub test() Dim mdp As String mdp = "bonjour" If InputBox("Entrez le mot de passe") = mdp Then MsgBox ("OK") End If End Sub Merci, GGAL