Couleur si textbox non vide

Bonjour a tous

je ne sait pas si c'est possible

mais est il possible que lorsqu’il y a du texte (recuperer de la feuille excel via un combobox d'un l'userform) dans la textbox1 le fond soit en vert sinon aucun changement.

Merci a vous .

Bonsoir,

Oui c'est possible, je pense, il suffit de mettre l'instruction dans un événement de ton USF

Sans fichier pas de code

bonjour BrunoM45

voici mon fichier de test

Merci de ton aide

Re,

Voici une possibilité de code dans ton USF de recherche par matricule

(code optimisé)

Private Sub ComboBox1_Change()
  Dim vrech As Range, Ind As Integer
  'je recherche dans la colonne B la valeur de la combo
  Set vrech = Sheets("Fiche plan").Columns("B:B").Find(Me.ComboBox1.Value, LookIn:=xlValues, LookAt:=xlWhole)
  'si je trouve une valeur alors j'affiche la valeur correspondante de la
  'colonne A dans le textbox
  If Not vrech Is Nothing Then
    ComboBox1.Value = vrech.Offset(0, 0).Text  ' MATRICULE
    With Me.TextBox1
      .Value = vrech.Offset(0, -1).Value  'code
      .BackColor = &HC000&
    End With
    ' Boucle pour le remplissage
    For Ind = 1 To 17
      Me("Textbox" & Ind + 1).Value = vrech.Offset(0, Ind).Value
    Next Ind
  Else
    With Me.TextBox1
      .Value = ""
      .BackColor = &H80000005
    End With
    ' Boucle pour le remplissage
    For Ind = 1 To 17
      Me("Textbox" & Ind + 1).Value = ""
    Next Ind
  End If
End Sub

A+

Déjà Merci BrunoM45 de l'attention que tu porte a ma question.

ensuite c'est presque ça

le but est de pouvoir mettre en évidence les textbox rempli mais la la couleur y est même si la textbox est vide.

Mais merci tout de même d'avoir pris du temps pour M'aider.

Bonjour reinruof77 , BrunoM45

Dans l'événement textbox1 change sur user 1 et 3

298fiche-exemple5-4.xlsm (53.31 Ko)

Merci BOB71AU

C'est exactement ce qu'il me faillais.

c’était si simple pourtant mais je ne trouvais pas

un gros Merci

Rechercher des sujets similaires à "couleur textbox vide"