Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
je suis vraiment navre j ai simplifie mon unserform pour il ne contient maintenant que 4 textbox
le code que vous m avez fournis n as pas foctionne avec mon formulaire voici piece joint pour eclairssir
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
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD