Bonsoir à tous.
Dans mon fichier je souhaiterais que la colonne i se remplisse en rouge si la quantité de la colonne K est supérieur ou égale à celle de J.
For Each Cel In Range("j2:j" & Lg)
If Range(Cel.Offset(0, 1).Address).HasFormula = True Then
With Cel
.FormatConditions.Delete
.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
Formula1:="=K" & Cel.Row & "c12"
.FormatConditions(1).Interior.ColorIndex = 3
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
End With
End If
J'ai mis un bouton mise en forme pour la macro totale de mise en forme
Merci
Dans mon fichier je souhaiterais que la colonne i se remplisse en rouge si la quantité de la colonne K est supérieur ou égale à celle de J.
For Each Cel In Range("j2:j" & Lg)
If Range(Cel.Offset(0, 1).Address).HasFormula = True Then
With Cel
.FormatConditions.Delete
.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
Formula1:="=K" & Cel.Row & "c12"
.FormatConditions(1).Interior.ColorIndex = 3
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
End With
End If
J'ai mis un bouton mise en forme pour la macro totale de mise en forme
Merci