Voilà, j'ai une feuille de calcul excel sur laquelle j'ai une liste
déroulante dans laquelle je choisi l'utilisateur et une cellule dans
laquelle je dois saisir le mot de passe correspondant à l'utilisateur pour
ouvrir en cliquant sur un bouton un formulaire.
Comment faut il faire pour voir apparaitre dans ma cellule mot de passe des
***** à la place du mot réel que je tape bien sûr le mot de passe tapé doit
pouvoir etre utilisé pour le comparer à celui correspondant à l'utilisateur
!
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
Clément Marcotte
Bonjour,
C'est une affaire de rien avec un UserForm et un TextBox avec la propriété PassworChar
"nesos" a écrit dans le message de news:%
bonjour à tous
Voilà, j'ai une feuille de calcul excel sur laquelle j'ai une liste déroulante dans laquelle je choisi l'utilisateur et une cellule dans laquelle je dois saisir le mot de passe correspondant à l'utilisateur pour
ouvrir en cliquant sur un bouton un formulaire.
Comment faut il faire pour voir apparaitre dans ma cellule mot de passe des
***** à la place du mot réel que je tape bien sûr le mot de passe tapé doit
pouvoir etre utilisé pour le comparer à celui correspondant à l'utilisateur
!
Merci
Bonjour,
C'est une affaire de rien avec un UserForm et un TextBox avec la
propriété PassworChar
"nesos" <laine_cedric@yahoo.fr> a écrit dans le message de
news:%23GH7q8nSEHA.3876@TK2MSFTNGP09.phx.gbl...
bonjour à tous
Voilà, j'ai une feuille de calcul excel sur laquelle j'ai une liste
déroulante dans laquelle je choisi l'utilisateur et une cellule dans
laquelle je dois saisir le mot de passe correspondant à
l'utilisateur pour
ouvrir en cliquant sur un bouton un formulaire.
Comment faut il faire pour voir apparaitre dans ma cellule mot de
passe des
***** à la place du mot réel que je tape bien sûr le mot de passe
tapé doit
pouvoir etre utilisé pour le comparer à celui correspondant à
l'utilisateur
C'est une affaire de rien avec un UserForm et un TextBox avec la propriété PassworChar
"nesos" a écrit dans le message de news:%
bonjour à tous
Voilà, j'ai une feuille de calcul excel sur laquelle j'ai une liste déroulante dans laquelle je choisi l'utilisateur et une cellule dans laquelle je dois saisir le mot de passe correspondant à l'utilisateur pour
ouvrir en cliquant sur un bouton un formulaire.
Comment faut il faire pour voir apparaitre dans ma cellule mot de passe des
***** à la place du mot réel que je tape bien sûr le mot de passe tapé doit
pouvoir etre utilisé pour le comparer à celui correspondant à l'utilisateur
!
Merci
michdenis
Bonjour nesos,
Dans un "ListBox" ou "Combobox", l'utilisation de l'étoile comme caractère de saisie pour un mot de passe
Cependant, tu peux insérer un contrôle textbox issu de la boîte d'outils Contrôle dans ta feuille de calcul.
Et voici ce que le code pourrait donner
Dans la feuille tu dois avoir les contrôles suivants :
A ) Un textbox issu de la boîte d'outils Contrôle nommé : "Textbox2"
B ) Un combobox issu de la boîte d'outils Contrôle nommé : ComboBox1 Où est ta liste de nom.
C ) un bouton de commande issu de la boîte d'outils Formulaire auquel tu attaches la macro : vérificationMotDePasse
Tout ce code doit se situer dans le module de la feuille où l'action se déroule
'Haut du module, déclaration d'une variable Dim MotDePasse As String
'----------------------------------------- Private Sub TextBox2_Change()
If Len(Me.TextBox2) = 0 Then MotDePasse = "" End If
End Sub '----------------------------------------- Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
MotDePasse = KeyAscii If KeyAscii <> 42 Then KeyAscii = 42 End If
End Sub '-----------------------------------------
Lorsque tu cliques sur le bouton , selon la valeur de ton combobox, il va y avoir une vérification des mots de passe... chacun des noms contenues dans ton combobox devant avoir un mot de passe particulier de défini... dans mon exemple : Usager 1 mot de passe = toto usager 2 "" = titi
'----------------------------------------- Sub vérificationMotDePasse()
If Me.ComboBox1.ListIndex = -1 Then Exit Sub Select Case Me.ComboBox1.ListIndex
Case 0 MotDePasse = "toto" 'ok --> action à définir Case 1 MotDePasse = "titi" 'ok --> action à définir Case 2 MotDePasse = "tata" 'ok --> action à définir Case Else MsgBox "Mot de passe refusé" End Select
End Sub '-----------------------------------------
Salutations!
"nesos" a écrit dans le message de news:% bonjour à tous
Voilà, j'ai une feuille de calcul excel sur laquelle j'ai une liste déroulante dans laquelle je choisi l'utilisateur et une cellule dans laquelle je dois saisir le mot de passe correspondant à l'utilisateur pour ouvrir en cliquant sur un bouton un formulaire.
Comment faut il faire pour voir apparaitre dans ma cellule mot de passe des ***** à la place du mot réel que je tape bien sûr le mot de passe tapé doit pouvoir etre utilisé pour le comparer à celui correspondant à l'utilisateur !
Merci
Bonjour nesos,
Dans un "ListBox" ou "Combobox", l'utilisation de l'étoile comme caractère de saisie pour un mot de passe
Cependant, tu peux insérer un contrôle textbox issu de la boîte d'outils Contrôle dans ta feuille de calcul.
Et voici ce que le code pourrait donner
Dans la feuille tu dois avoir les contrôles suivants :
A ) Un textbox issu de la boîte d'outils Contrôle nommé : "Textbox2"
B ) Un combobox issu de la boîte d'outils Contrôle nommé : ComboBox1
Où est ta liste de nom.
C ) un bouton de commande issu de la boîte d'outils Formulaire auquel tu attaches la macro : vérificationMotDePasse
Tout ce code doit se situer dans le module de la feuille où l'action se déroule
'Haut du module, déclaration d'une variable
Dim MotDePasse As String
'-----------------------------------------
Private Sub TextBox2_Change()
If Len(Me.TextBox2) = 0 Then
MotDePasse = ""
End If
End Sub
'-----------------------------------------
Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
MotDePasse = KeyAscii
If KeyAscii <> 42 Then
KeyAscii = 42
End If
End Sub
'-----------------------------------------
Lorsque tu cliques sur le bouton , selon la valeur de ton combobox, il va y avoir une vérification des mots de passe...
chacun des noms contenues dans ton combobox devant avoir un mot de passe particulier de défini... dans mon exemple :
Usager 1 mot de passe = toto
usager 2 "" = titi
'-----------------------------------------
Sub vérificationMotDePasse()
If Me.ComboBox1.ListIndex = -1 Then Exit Sub
Select Case Me.ComboBox1.ListIndex
Case 0
MotDePasse = "toto"
'ok --> action à définir
Case 1
MotDePasse = "titi"
'ok --> action à définir
Case 2
MotDePasse = "tata"
'ok --> action à définir
Case Else
MsgBox "Mot de passe refusé"
End Select
End Sub
'-----------------------------------------
Salutations!
"nesos" <laine_cedric@yahoo.fr> a écrit dans le message de news:%23GH7q8nSEHA.3876@TK2MSFTNGP09.phx.gbl...
bonjour à tous
Voilà, j'ai une feuille de calcul excel sur laquelle j'ai une liste
déroulante dans laquelle je choisi l'utilisateur et une cellule dans
laquelle je dois saisir le mot de passe correspondant à l'utilisateur pour
ouvrir en cliquant sur un bouton un formulaire.
Comment faut il faire pour voir apparaitre dans ma cellule mot de passe des
***** à la place du mot réel que je tape bien sûr le mot de passe tapé doit
pouvoir etre utilisé pour le comparer à celui correspondant à l'utilisateur
!
Dans un "ListBox" ou "Combobox", l'utilisation de l'étoile comme caractère de saisie pour un mot de passe
Cependant, tu peux insérer un contrôle textbox issu de la boîte d'outils Contrôle dans ta feuille de calcul.
Et voici ce que le code pourrait donner
Dans la feuille tu dois avoir les contrôles suivants :
A ) Un textbox issu de la boîte d'outils Contrôle nommé : "Textbox2"
B ) Un combobox issu de la boîte d'outils Contrôle nommé : ComboBox1 Où est ta liste de nom.
C ) un bouton de commande issu de la boîte d'outils Formulaire auquel tu attaches la macro : vérificationMotDePasse
Tout ce code doit se situer dans le module de la feuille où l'action se déroule
'Haut du module, déclaration d'une variable Dim MotDePasse As String
'----------------------------------------- Private Sub TextBox2_Change()
If Len(Me.TextBox2) = 0 Then MotDePasse = "" End If
End Sub '----------------------------------------- Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
MotDePasse = KeyAscii If KeyAscii <> 42 Then KeyAscii = 42 End If
End Sub '-----------------------------------------
Lorsque tu cliques sur le bouton , selon la valeur de ton combobox, il va y avoir une vérification des mots de passe... chacun des noms contenues dans ton combobox devant avoir un mot de passe particulier de défini... dans mon exemple : Usager 1 mot de passe = toto usager 2 "" = titi
'----------------------------------------- Sub vérificationMotDePasse()
If Me.ComboBox1.ListIndex = -1 Then Exit Sub Select Case Me.ComboBox1.ListIndex
Case 0 MotDePasse = "toto" 'ok --> action à définir Case 1 MotDePasse = "titi" 'ok --> action à définir Case 2 MotDePasse = "tata" 'ok --> action à définir Case Else MsgBox "Mot de passe refusé" End Select
End Sub '-----------------------------------------
Salutations!
"nesos" a écrit dans le message de news:% bonjour à tous
Voilà, j'ai une feuille de calcul excel sur laquelle j'ai une liste déroulante dans laquelle je choisi l'utilisateur et une cellule dans laquelle je dois saisir le mot de passe correspondant à l'utilisateur pour ouvrir en cliquant sur un bouton un formulaire.
Comment faut il faire pour voir apparaitre dans ma cellule mot de passe des ***** à la place du mot réel que je tape bien sûr le mot de passe tapé doit pouvoir etre utilisé pour le comparer à celui correspondant à l'utilisateur !
Merci
AV
Une boite de dial XL5 avec une zone d'édition (format de controle : Entrée de style mot de passe) C'est simple et vite fait....
AV
Une boite de dial XL5 avec une zone d'édition (format de controle : Entrée de
style mot de passe)
C'est simple et vite fait....
