Discussion :

[hannibal_barka]

bonjour a tous

je travaille sur le codage d'une procédure permettant d'affecter la valeur 0 à tous les zones de saisie d'un userform.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
For i = 1 To 7
    UserForm.TextBox(i). value = 0
Next i

mais cette instruction fait afficher le message "object doesn't support this property or method" . je ne vois pas ou est l'erreur

Merci

[babaothe]

Salut,
Si tes textboxes sont textbox1, textbox2,.....

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
For i = 1 To 7
    UserForm.Controls("TextBox" & i). value = 0
Next i

[hannibal_barka]

merci bien pour l'aide, ça fonctionne bien!