mariobross
XLDnaute Occasionnel
bonjour le forum , je cherche à mettre une couleur conditionnelle dans une texbox (ou autre controle) j'ai écris :
pour la condition dans la feuille de calcul :
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Range("b4").Value = 1 Then texbox1.ForeColor = RGB(255, 200, 200)
End Sub
pour la condition directement dans la texbox :
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If texbox1.Value = "date dépassée" Then texbox1.ForeColor = RGB(255, 200, 200)
End Sub
dans les 2 cas j'ai une erreur , merci pour vos aides.
pour la condition dans la feuille de calcul :
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Range("b4").Value = 1 Then texbox1.ForeColor = RGB(255, 200, 200)
End Sub
pour la condition directement dans la texbox :
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If texbox1.Value = "date dépassée" Then texbox1.ForeColor = RGB(255, 200, 200)
End Sub
dans les 2 cas j'ai une erreur , merci pour vos aides.