Re : CODE POUR Userform
Bonjour Bennisay,
Le code fonctionne parfaitement, et j'ai repris votre fichier à l'identique mais modifier votre formulaire pour qu'il puisse fonctionner.
A l'ouverture du formulaire, les Textbox suivante sont invisibles :
TextBox1.Visible = False
TextBox2.Visible = False
TextBox7.Visible = False
TextBox8.Visible = False
Ces lignes sont inscrites dans Private Sub UserForm_Initialize()
Mais j'aurai pu faire plus compliqué et plus "propre", mais je ne pense pas que vous auriez tout compris mais j'ai peut-être tort.
For I = 1 To 2
Me.Controls("TextBox" & I).Visible = False
Next I
For I = 3 To 6
Me.Controls("TextBox" & I).Visible = True
Next I
For I = 7 To 8
Me.Controls("TextBox" & I).Visible = False
Next I
A bientôt