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:
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.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
la je comprends pas ?
Partager