J'ai créé une mise en forme conditionnelle pour faire ressortir en couleur les dates dépassées de 5 jours, sur une colonne où s'applique une formule vba,
mais bon.. ça ne fonctionne pas
Quelqu'un aurait-il une idée svp ?
Bonjour Gourbi,Lolote, Chris,
En PJ un essai avec comme MFC ( j'ai fait un peu de zèle ) :
Rouge si dépassée de plus de 5 jours : =ET(D5<>"";D5<=AUJOURDHUI()-5)
Orange si dépassé entre 1 et 5 jours : =ET($D5<>"";$D5<AUJOURDHUI())
Vert pour repérer le jour en cours : =ET(D5<>"";D5=AUJOURDHUI())
( Pour le rouge c'est =ET(D5<>"";D5<=AUJOURDHUI()-5) et non =ET(D5<>"";D5<AUJOURDHUI()+5) )
Salut Gourbi1986,
Peut être en modifiant la ligne du code comme ceci
Avant : RetourPrévu = Format(Cells(2, F), "[$-40C]dd/mm/yyyy;@")
Après : RetourPrévu = CDate(Format(Cells(2, F), "[$-40C]dd/mm/yyyy;@"))
Même constat : les dates sont forcées en texte avec Format
Le colonne D du tableau structuré étant déjà formatée on peut simplifier
VB:
Function RetourPrévu(D)
RetourPrévu = 0
Ligne = D.Row
For f = 256 To D.Column + 2 Step -1
If Cells(Ligne, f).Interior.Color <> RGB(255, 255, 255) Then
RetourPrévu = Cells(2, f)
Exit Function
End If
Next f
End Function
Bonjour Gourbi,Lolote, Chris,
En PJ un essai avec comme MFC ( j'ai fait un peu de zèle ) :
Rouge si dépassée de plus de 5 jours : =ET(D5<>"";D5<=AUJOURDHUI()-5)
Orange si dépassé entre 1 et 5 jours : =ET($D5<>"";$D5<AUJOURDHUI())
Vert pour repérer le jour en cours : =ET(D5<>"";D5=AUJOURDHUI())
( Pour le rouge c'est =ET(D5<>"";D5<=AUJOURDHUI()-5) et non =ET(D5<>"";D5<AUJOURDHUI()+5) )