M Mgn_91 XLDnaute Nouveau 25 Février 2016 #1 Bonjour, J'ai construit un formulaire comprenant des textbox et je souhaite limiter la saisie d'une TextBox à des données numériques comprises entre 0 et 100, comment dois-je procéder ? Merci pour votre aide.
Bonjour, J'ai construit un formulaire comprenant des textbox et je souhaite limiter la saisie d'une TextBox à des données numériques comprises entre 0 et 100, comment dois-je procéder ? Merci pour votre aide.
L laetitia90 XLDnaute Barbatruc 25 Février 2016 #2 Re : VBA : Valeur d"une TextBox comprise entre deux nombres bonjour Mgn_91 ben !! a la place de textbox mettre combobox de 1 a 100.... plus de souci de faute frappe valeur pas conforme ect... Vote positif 0 Vote négatif
Re : VBA : Valeur d"une TextBox comprise entre deux nombres bonjour Mgn_91 ben !! a la place de textbox mettre combobox de 1 a 100.... plus de souci de faute frappe valeur pas conforme ect...
L laetitia90 XLDnaute Barbatruc 25 Février 2016 #3 Re : VBA : Valeur d"une TextBox comprise entre deux nombres re un exemple quand meme For i = 1 To 100 ComboBox1.AddItem i Next i Cliquez pour agrandir... Vote positif 0 Vote négatif
Re : VBA : Valeur d"une TextBox comprise entre deux nombres re un exemple quand meme For i = 1 To 100 ComboBox1.AddItem i Next i Cliquez pour agrandir...
M Mgn_91 XLDnaute Nouveau 25 Février 2016 #4 Re : VBA : Valeur d"une TextBox comprise entre deux nombres Merci pour cet info. J'ai finalement adapté votre code à mon userform ainsi : Private Sub ComboBox1_Change() Dim Valeur_A Valeur_A = Me.ComboBox1.Value If Valeur_A > 100 Or Valeur_A < 0 Then MsgBox "Veuillez entrer une valeur comprise entre 0 et 100" Exit Sub Else For i = 1 To 100 ComboBox1.AddItem i Next i End If End Sub Vote positif 0 Vote négatif
Re : VBA : Valeur d"une TextBox comprise entre deux nombres Merci pour cet info. J'ai finalement adapté votre code à mon userform ainsi : Private Sub ComboBox1_Change() Dim Valeur_A Valeur_A = Me.ComboBox1.Value If Valeur_A > 100 Or Valeur_A < 0 Then MsgBox "Veuillez entrer une valeur comprise entre 0 et 100" Exit Sub Else For i = 1 To 100 ComboBox1.AddItem i Next i End If End Sub
L laetitia90 XLDnaute Barbatruc 25 Février 2016 #5 Re : VBA : Valeur d"une TextBox comprise entre deux nombres re, tu as pas besoin d'ecrire tout cela dans propriete de la combo tu changes le style tu passe en style en 2-fmStyleDropDownList la boucle dans initialise ou activate Code: Private Sub UserForm_initialize() Dim i As Byte For i = 1 To 100: ComboBox1.AddItem i: Next i End Sub Vote positif 0 Vote négatif
Re : VBA : Valeur d"une TextBox comprise entre deux nombres re, tu as pas besoin d'ecrire tout cela dans propriete de la combo tu changes le style tu passe en style en 2-fmStyleDropDownList la boucle dans initialise ou activate Code: Private Sub UserForm_initialize() Dim i As Byte For i = 1 To 100: ComboBox1.AddItem i: Next i End Sub
M Mgn_91 XLDnaute Nouveau 25 Février 2016 #6 Re : VBA : Valeur d"une TextBox comprise entre deux nombres Merci beaucoup pour cette astuce ! Vote positif 0 Vote négatif