B Bosco13 XLDnaute Occasionnel 13 Mars 2014 #1 Bonjour a tous le Forum !! j'ai un petits blocage pour une fonction qui a mon avis est toute simple. 1---dans mon userform j'ai une chekbox1 et une texbox8 en cochant la chekbox1 je souhaiterai afficher une valeur fixe dans la textbox8 " 12345" par exemple Je vous remercie d'avance pour votre aide. @@@ Bosco
Bonjour a tous le Forum !! j'ai un petits blocage pour une fonction qui a mon avis est toute simple. 1---dans mon userform j'ai une chekbox1 et une texbox8 en cochant la chekbox1 je souhaiterai afficher une valeur fixe dans la textbox8 " 12345" par exemple Je vous remercie d'avance pour votre aide. @@@ Bosco
J Jack2 XLDnaute Occasionnel 13 Mars 2014 #2 Re : Valeur Chekbox vers texbox Bonjour Bosco13 If checkbox1 = true then textbox8 " 12345" Pour placer cette ligne : clic doit sur checkbox1, visualiser le code puis la mettre dans la procédure. A+ Jack2 Vote positif 0 Vote négatif
Re : Valeur Chekbox vers texbox Bonjour Bosco13 If checkbox1 = true then textbox8 " 12345" Pour placer cette ligne : clic doit sur checkbox1, visualiser le code puis la mettre dans la procédure. A+ Jack2
Efgé XLDnaute Barbatruc 13 Mars 2014 #3 Re : Valeur Chekbox vers texbox Bonjour Bosco13 A mettre dans le code du UserForm concerrné: VB: Private Sub CheckBox1_Click() Me.TextBox8.Text = IIf(CheckBox1.Value = True, "12345", "") End Sub Cordialement Edit Bonjour Jack2 Vote positif 0 Vote négatif
Re : Valeur Chekbox vers texbox Bonjour Bosco13 A mettre dans le code du UserForm concerrné: VB: Private Sub CheckBox1_Click() Me.TextBox8.Text = IIf(CheckBox1.Value = True, "12345", "") End Sub Cordialement Edit Bonjour Jack2
Paf XLDnaute Barbatruc 13 Mars 2014 #4 Re : Valeur Chekbox vers texbox Bonjour Dans Private Sub CheckBox1_Click(), ajouter cette ligne TextBox8.Value = IIf(CheckBox1.Value, "12345", "") si checkbox cochée => textbox8= "12345" si checkbox décochée => textbox8= "" A+ Edit: bonjour Efgé et Jack2 Vote positif 0 Vote négatif
Re : Valeur Chekbox vers texbox Bonjour Dans Private Sub CheckBox1_Click(), ajouter cette ligne TextBox8.Value = IIf(CheckBox1.Value, "12345", "") si checkbox cochée => textbox8= "12345" si checkbox décochée => textbox8= "" A+ Edit: bonjour Efgé et Jack2
J Jack2 XLDnaute Occasionnel 13 Mars 2014 #5 Re : Valeur Chekbox vers texbox Bonjour le fil, Merci à Efgé et à Paf de me rappeler l'utilité de la fonction IIF que j'oublie systématiquement. A+ Jack2 Vote positif 0 Vote négatif
Re : Valeur Chekbox vers texbox Bonjour le fil, Merci à Efgé et à Paf de me rappeler l'utilité de la fonction IIF que j'oublie systématiquement. A+ Jack2
B Bosco13 XLDnaute Occasionnel 13 Mars 2014 #6 Re : Valeur Chekbox vers texbox Bonpour a tous je vous remercie tous c'est super c'est que je souhaitais Merci encore Bosco13 Vote positif 0 Vote négatif
Re : Valeur Chekbox vers texbox Bonpour a tous je vous remercie tous c'est super c'est que je souhaitais Merci encore Bosco13
Staple1600 XLDnaute Barbatruc 13 Mars 2014 #7 Re : Valeur Chekbox vers texbox Bonsoir à tous Pour le fun et pour le plaisir de croisé Efgé et Paf Une autre possibilité Code: Private Sub CheckBox8_Click() TextBox8 = Application.Rept("12345", CheckBox1) End Sub Vote positif 0 Vote négatif
Re : Valeur Chekbox vers texbox Bonsoir à tous Pour le fun et pour le plaisir de croisé Efgé et Paf Une autre possibilité Code: Private Sub CheckBox8_Click() TextBox8 = Application.Rept("12345", CheckBox1) End Sub