Changement de couleur selon une date sur Excel
Résolu
Assiatout
Messages postés
3
Date d'inscription
Statut
Membre
Dernière intervention
-
Maurice -
Maurice -
Bonjour à tous,
Je rencontre un problème de formule sur Excel et je n'ai pas trouvé de solution pour l'instant sur ce forum.
Je vous explique mon problème : dans mon fichier, les 2 colonnes qui nous intéressent ici sont :
- colonne F = date d'inscription
- colonne G = date de révision
Je souhaite que si, par exemple, la cellule G1 est toujours vide 10 jours après la date d'inscription (F1), la cellule G1 apparaisse en rouge afin que ce soit tout de suite visible, est-ce possible?
Je précise que je suis sur Excel 2010, en anglais
Merci d'avance^^
Je rencontre un problème de formule sur Excel et je n'ai pas trouvé de solution pour l'instant sur ce forum.
Je vous explique mon problème : dans mon fichier, les 2 colonnes qui nous intéressent ici sont :
- colonne F = date d'inscription
- colonne G = date de révision
Je souhaite que si, par exemple, la cellule G1 est toujours vide 10 jours après la date d'inscription (F1), la cellule G1 apparaisse en rouge afin que ce soit tout de suite visible, est-ce possible?
Je précise que je suis sur Excel 2010, en anglais
Merci d'avance^^
A voir également:
- Changement de couleur selon une date sur Excel
- Excel cellule couleur si condition texte - Guide
- Liste déroulante excel - Guide
- Changer de dns - Guide
- Déplacer une colonne excel - Guide
- Somme si couleur excel - Guide
4 réponses
Bonjour
Apres avoir selectionné G1 et mise en forme conditionnelle Nouvelle règle Appliquer formule tu rentres la formule suivante :
=ET(AUJOURDHUI()>F1+10;G1="")
soit en anglais je pense : AND(TODAY()>B4+10;D4="")
Cdlmnt
Apres avoir selectionné G1 et mise en forme conditionnelle Nouvelle règle Appliquer formule tu rentres la formule suivante :
=ET(AUJOURDHUI()>F1+10;G1="")
soit en anglais je pense : AND(TODAY()>B4+10;D4="")
Cdlmnt
Bonjour !
Tout d'abord, merci de la rapidité de ta réponse
Ca ne fonctionne pas mais peut-être que je m'y prend mal : dans la section "formules conditionnelles", on va dans "nouvelles règle" et la formule on la rentre bien dans la partie "utiliser une formule pour déterminer quelles cellules formater" ("use a formula to determine which cells to format) ?
Merci d'avance
Tout d'abord, merci de la rapidité de ta réponse
Ca ne fonctionne pas mais peut-être que je m'y prend mal : dans la section "formules conditionnelles", on va dans "nouvelles règle" et la formule on la rentre bien dans la partie "utiliser une formule pour déterminer quelles cellules formater" ("use a formula to determine which cells to format) ?
Merci d'avance
Finalement j'ai réussi ! merciiiiiiii :D
Et je tiens à préciser (si quelqu'un a un jour le même soucis que moi), afin que la colonne G ne s'affiche pas entièrement en rouge quand on n'a pas encore mis de date dans la colonne de "date de création", il faut ajouter comme condition "NON(ESTVIDE(F1))" (en anglais : "NOT(ISBLANK(G1))")
Formule finale : =AND(TODAY()>$F1+10;$G1="";NOT(ISBLANK($F1)))
Et je tiens à préciser (si quelqu'un a un jour le même soucis que moi), afin que la colonne G ne s'affiche pas entièrement en rouge quand on n'a pas encore mis de date dans la colonne de "date de création", il faut ajouter comme condition "NON(ESTVIDE(F1))" (en anglais : "NOT(ISBLANK(G1))")
Formule finale : =AND(TODAY()>$F1+10;$G1="";NOT(ISBLANK($F1)))
Bonjour
si tu veux jouer avec une macro
Sub TestDate()
Nlig = Range("F" & Rows.Count).End(xlUp).Row
For L = 2 To Nlig
If Range("F" & L).Value <> "" Then
MaDate = Range("F" & L).Value + 10
Range("G" & L).Interior.ColorIndex = xlNone
If MaDate <= DateValue(Now) And Range("G" & L).Value = "" Then
Range("G" & L).Interior.ColorIndex = 3
End If
End If
Next
End Sub
A+
Maurice
si tu veux jouer avec une macro
Sub TestDate()
Nlig = Range("F" & Rows.Count).End(xlUp).Row
For L = 2 To Nlig
If Range("F" & L).Value <> "" Then
MaDate = Range("F" & L).Value + 10
Range("G" & L).Interior.ColorIndex = xlNone
If MaDate <= DateValue(Now) And Range("G" & L).Value = "" Then
Range("G" & L).Interior.ColorIndex = 3
End If
End If
Next
End Sub
A+
Maurice