BONJOUR
J'ai un petit souci que je n'arrive pas à résoudre .
J'essaie de faire une condition avec des dates qui alimenter les textbox qui sont trouvent ds userform a colonne(limite F_ment et Date vp).
limite F_ment:
TextBox2,TextBox5,TextBox8 TextBox11 TextBox14 TextBox17 TextBox20 TextBox30 .......
date vp :
TextBox3 TextBox6 TextBox9 TextBox12 TextBox15 TextBox18 TextBox21 TextBox24 ..........
Condition:
If TextBox2 >= Now() + 10 Then
TextBox2.BackColor = vbGreen ' VERT
ElseIf TextBox2 > Now() And TextBox2 < Now() + 10 Then
TextBox2.BackColor = vbMagenta 'Gold
Else: TextBox2.BackColor = vbRed 'Red
End If
If TextBox5 >= Now() + 10 Then
TextBox5.BackColor = vbMagenta '= RGB(50, 250, 50) ' VERT
ElseIf TextBox5 > Now() And TextBox5 < Now() + 10 Then
TextBox5.BackColor = vbMagenta 'Gold
Else: TextBox5.BackColor = vbRed 'Red
End If
+++
merci