Mot de passe VBA qui ne fonctionne pas
Valochelboss
Messages postés
2
Statut
Membre
-
Patrice33740 Messages postés 8931 Date d'inscription Statut Membre Dernière intervention -
Patrice33740 Messages postés 8931 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Sur Visual Basis sur Excel 2010, j'ai mis ça
"Private Sub CommandButton1_Click()
If Mot_de_passe.Nom_utilisateur <> "utilisateur" Then
MsgBox "Nom d'utilisateur incorrect!"
Nom_utilisateur.SetFocus
Exit Sub
End If
If Mot_de_passe.Motdepasse <> "mdp" Then
MsgBox "Mot de passe incorrect !"
Motdepasse.SetFocus
Exit Sub
End If
Nom_utilisateur.Text = "utilisateur"
Motdepasse.Text = "mdp"
Mot_de_passe.Hide
Sheets("Feuil2").Select
End Sub"
La feuille s'ouvre quand le mot de passe et l'utilisateur sont bons. Mais si je me trompe et que je clique sur la petite croix rouge de mon userform, ma feuille s'ouvre quand même (malgré le message "Nom d'utilisateur incorrect !"). Quelle commande ai-je oublié?
Merci d'avance pour vos réponses.
Bonne soirée.
Sur Visual Basis sur Excel 2010, j'ai mis ça
"Private Sub CommandButton1_Click()
If Mot_de_passe.Nom_utilisateur <> "utilisateur" Then
MsgBox "Nom d'utilisateur incorrect!"
Nom_utilisateur.SetFocus
Exit Sub
End If
If Mot_de_passe.Motdepasse <> "mdp" Then
MsgBox "Mot de passe incorrect !"
Motdepasse.SetFocus
Exit Sub
End If
Nom_utilisateur.Text = "utilisateur"
Motdepasse.Text = "mdp"
Mot_de_passe.Hide
Sheets("Feuil2").Select
End Sub"
La feuille s'ouvre quand le mot de passe et l'utilisateur sont bons. Mais si je me trompe et que je clique sur la petite croix rouge de mon userform, ma feuille s'ouvre quand même (malgré le message "Nom d'utilisateur incorrect !"). Quelle commande ai-je oublié?
Merci d'avance pour vos réponses.
Bonne soirée.
A voir également:
- Mot de passe VBA qui ne fonctionne pas
- Trousseau mot de passe iphone - Guide
- Mot de passe administrateur - Guide
- Mot de passe bios perdu - Guide
- Identifiant et mot de passe - Guide
- Mot de passe compromis - Guide
4 réponses
« ma feuille s'ouvre quand même »
Certainement parce qu'elle était ouverte avant d'ouvrir le formulaire !
« Quelle commande ai-je oublié? »
Peut-être au début du code :
Sheets("Feuil1").Select
Certainement parce qu'elle était ouverte avant d'ouvrir le formulaire !
« Quelle commande ai-je oublié? »
Peut-être au début du code :
Sheets("Feuil1").Select
Bonjour,
Depuis quel endroit du classeur vous ouvrez le formulaire pour contrôle du nom et mot de passe utilisateur?
Depuis quel endroit du classeur vous ouvrez le formulaire pour contrôle du nom et mot de passe utilisateur?
Pour Patrice33740 : je la mets où cette commande? Parce que je pense qu'il faut un "if" ou quelque chose comme ça pour l'introduire?
Pour Le Pingou : je l'ouvre depuis la "feuil1" pour aller à la "feuil2". Mais en cas de mauvaise saisie du mot de passe, je voudrais que l'utilisateur retourne à la "feuil1". Comment faire?
Pour Le Pingou : je l'ouvre depuis la "feuil1" pour aller à la "feuil2". Mais en cas de mauvaise saisie du mot de passe, je voudrais que l'utilisateur retourne à la "feuil1". Comment faire?
