Textbox couleur

Bonjour,

Ma 2e demande porte sur les textbox et les couleurs. j'aimerais que les Textbox de mon USF soient en couleur rouge par exemple et, une fois remplies, qu'elles soient blanches.

est il possible de l’appliquer à toutes en 1 fois, ou Textbox par textbox ?

je cherche depuis un moment et je ne trouve rien qui peut m'aider SVP ?

merci de votre aide

Bonjour

Un essai à tester. Te convient-il ?

Bye !

Bonjour,

Si le nom des textbox est de la forme TextBox1, TextBox2 .... pour les avoir en rouge dès l'ouverture de l'USF:

Private Sub UserForm_Initialize()
For i = 1 To 3
    Me("TextBox" & i).BackColor = RGB(255, 0, 0)
Next
End Sub

ou bien modifier manuellement la propriété BackColor de chaque textbox

pour modifier la couleur en blanc:

For i = 1 To 3
    Me("TextBox" & i).BackColor = RGB(255, 255, 255)
Next

à placer en fonction de l'évènement qui doit déclencher le changement de couleur.

A+

Edit : bonjour gmb

Bonsoir,

c'est exactement ça. mais ça ne fonctionne pas chez moi; je regarde quand même

merci

Bonsoir Bidoutche, gmb , AlgoPlus, le forum,

Un autre essai....

Une tentative avec un module de classe (après avoir pas mal galéré, ), un pro me corrigera

Si tu rajoutes une textbox, elle est prise en compte.

Bonne soirée,

merci pour ton coup de main;