For avec TextBox

Question

J'ai besoin d'aide concernant ce problème : J'aimerais, lorsqu'une valeur dans la variable " adec " se trouve aussi dans une de mes TextBox, passer en couleur vert la BackColor de l'image qui se trouve en fond de la Textbox associée. Pour résumer, j'ai du texte qui s'entoure de vert lorsque ce même texte correspond à ma variable. J'ai peur de pas être très clair Voici mon code : Il y a 6 TextBox au total : Private Sub tttt() nbbox = 6 For i = 1 To nbbox If TextBox & i.Value = adec Then Image &i.BackColor = RGB(0,255,0) End If Next End Sub L'erreur "objet requis" s'affiche. Merci d'avance ...

PinkRabbit · Answer

Babz01,

Tu appelles tes textbox par leur nom (j'imagine Textbox1, Textbox2, ...)

Dans ce cas il faut que tu les appeles via Controls(<Nom de la textbox>)

Private Sub tttt()

nbbox = 6
For i = 1 To nbbox

    If Controls("TextBox" & i).Value = adec Then
        Controls("Image" & i).BackColor = RGB(0,255,0)

    End If

Next

End Sub