Ilino XLDnaute Barbatruc 14 Janvier 2015 #1 Bonjour forum je souhaite activer mon ComboBox (contrôle) dans une feuille via un bouton mais avec un mot de passe ci dessous mon code Code: Private Sub CommandButton4_Click() ComboBox2.Enabled = True End Sub grazie Dernière édition: 14 Janvier 2015
Bonjour forum je souhaite activer mon ComboBox (contrôle) dans une feuille via un bouton mais avec un mot de passe ci dessous mon code Code: Private Sub CommandButton4_Click() ComboBox2.Enabled = True End Sub grazie
Pierrot93 XLDnaute Barbatruc 14 Janvier 2015 #2 Re : activer ComboBox par un bouton et mot de passe Bonjour, essaye peut être ceci : Code: Private Sub CommandButton1_Click() ComboBox1.Enabled = InputBox("mot de passe ???") = "toto" End Sub bonne journée @+ Vote positif 0 Vote négatif
Re : activer ComboBox par un bouton et mot de passe Bonjour, essaye peut être ceci : Code: Private Sub CommandButton1_Click() ComboBox1.Enabled = InputBox("mot de passe ???") = "toto" End Sub bonne journée @+
Ilino XLDnaute Barbatruc 14 Janvier 2015 #3 Re : activer ComboBox par un bouton et mot de passe Bonjour Pierrot C'est super ça fonctionne , mais la saisie de mot de passe est visible, je le souhaite qu'il soit masqué ( en etoile par exemple **** ) si c'est possibl GRAZIE Vote positif 0 Vote négatif
Re : activer ComboBox par un bouton et mot de passe Bonjour Pierrot C'est super ça fonctionne , mais la saisie de mot de passe est visible, je le souhaite qu'il soit masqué ( en etoile par exemple **** ) si c'est possibl GRAZIE
Pierrot93 XLDnaute Barbatruc 14 Janvier 2015 #4 Re : activer ComboBox par un bouton et mot de passe Re, il faut alors créer un userform avec un textbox en modifiant la propriété "PasswordChar", par le code on peut le faire ainsi : Code: TextBox1.PasswordChar = "*" A noter de nombreux exemples présents sur le forum.... Vote positif 0 Vote négatif
Re : activer ComboBox par un bouton et mot de passe Re, il faut alors créer un userform avec un textbox en modifiant la propriété "PasswordChar", par le code on peut le faire ainsi : Code: TextBox1.PasswordChar = "*" A noter de nombreux exemples présents sur le forum....
Ilino XLDnaute Barbatruc 14 Janvier 2015 #5 Re : activer ComboBox par un bouton et mot de passe Re oky ,je vais voir et je vous joint un exemple GRAZIE pierrot Vote positif 0 Vote négatif
Re : activer ComboBox par un bouton et mot de passe Re oky ,je vais voir et je vous joint un exemple GRAZIE pierrot
Ilino XLDnaute Barbatruc 14 Janvier 2015 #6 Re : activer ComboBox par un bouton et mot de passe Bonjour Pierrot ci jont ma proposition pour avis et commentaire GRazie Edit : PW : toto Pièces jointes mdp.xlsm 25.6 KB · Affichages: 45 mdp.xlsm 25.6 KB · Affichages: 43 mdp.xlsm 25.6 KB · Affichages: 34 Vote positif 0 Vote négatif
Re : activer ComboBox par un bouton et mot de passe Bonjour Pierrot ci jont ma proposition pour avis et commentaire GRazie Edit : PW : toto
Pierrot93 XLDnaute Barbatruc 14 Janvier 2015 #7 Re : activer ComboBox par un bouton et mot de passe Re, tu pourrais également le faire comme ceci : Code: Private Sub CommandButton1_Click() Sheets("Feuil1").ComboBox1.Enabled = TextBox1 = "toto" Unload Me End Sub la propriété "enabled" du combo étant placé sur "false" directement dans la fen^tre propriétés de l'objet... Vote positif 0 Vote négatif
Re : activer ComboBox par un bouton et mot de passe Re, tu pourrais également le faire comme ceci : Code: Private Sub CommandButton1_Click() Sheets("Feuil1").ComboBox1.Enabled = TextBox1 = "toto" Unload Me End Sub la propriété "enabled" du combo étant placé sur "false" directement dans la fen^tre propriétés de l'objet...
Ilino XLDnaute Barbatruc 14 Janvier 2015 #8 Re : activer ComboBox par un bouton et mot de passe Re Merci Pierrot , c'est plus simple GRAZIE Vote positif 0 Vote négatif