intialisation d'un userform

bonjour
j'ouvre un userform par la commande
load userform1
userform1.show

ce userform contient des textbox que je souhaite initialisée en leur donnant une valeur par defaut comme cela:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Private Sub UserForm_initialize() textbox10.value=1 (A) end sub   pour ce meme textbox, je controle le contenu par   Private Sub TextBox10_Change()   TextBox10.Value = 1 If TextBox10.Value = "" Or TextBox10.Value = 0 Or TextBox10.Value > 200 Or TextBox10.Value > TextBox11.Value Then MsgBox ("Attention la valeur mini de la somme des combinaisons est fausse") TextBox10.Value = 1 'valeur par defaut End If   End Sub

---

hors à l'execution du userform, j'ai le message comme quoi "Attention la valeur mini de la somme des combinaisons est fausse" alors que j'ai initialise le textbox10à l'ouverture du userform1.
:cry:

la je comprends pas ?

bonjour,
tu initialise ton txbox 10 à 1
puis tu lui affecte 9 lors d un evenement change => txbox 10 à l initialisation = 9.

Bonjour Oscar.Cesar,

Le contenu des "TextBox" est du texte.

Avec :

Code:

---

1 2 3 4

If TextBox10.Value = "" Or Val(TextBox10.Value) = 0 Or Val(TextBox10.Value) > 200 Or Val(TextBox10.Value) > TextBox11.Value Then MsgBox ("Attention la valeur mini de la somme des combinaisons est fausse") TextBox10.Value = 9 End if

---

Cela devrait fonctionner.

bonsoir
GROSSIERE ERREUR de ma part dans le post initial , c'est PAS 9 MAIS 1

voila c'est corrigé.
desole