Bonsoir,
J'essai de mettre une couleur dans une cellule en fonction de sa valeur mais malheureusement la valeur n'est pas lue en fonction des opérateurs
If 3 >= ActiveCell.Offset(0, 4).Value < 4 Then
Range(ActiveCell, ActiveCell.Offset(0, 5)).Select
With Selection.Font
.Color = -16776961
.TintAndShade = 0
End With
GoTo Fin
End If
If 4 >= ActiveCell.Offset(0, 4).Value < 5 Then
Range(ActiveCell, ActiveCell.Offset(0, 5)).Select
With Selection.Font
.Color = xlThemeColorLight1
.TintAndShade = 0
End With
GoTo Fin
End If
J'ai toujours la couleur rouge quelque soit la valeur de la cellule dans la colonne E.
Comment corriger.
Merci
J'essai de mettre une couleur dans une cellule en fonction de sa valeur mais malheureusement la valeur n'est pas lue en fonction des opérateurs
If 3 >= ActiveCell.Offset(0, 4).Value < 4 Then
Range(ActiveCell, ActiveCell.Offset(0, 5)).Select
With Selection.Font
.Color = -16776961
.TintAndShade = 0
End With
GoTo Fin
End If
If 4 >= ActiveCell.Offset(0, 4).Value < 5 Then
Range(ActiveCell, ActiveCell.Offset(0, 5)).Select
With Selection.Font
.Color = xlThemeColorLight1
.TintAndShade = 0
End With
GoTo Fin
End If
J'ai toujours la couleur rouge quelque soit la valeur de la cellule dans la colonne E.
Comment corriger.
Merci
Dernière édition: