Changement de couleur selon une date sur Excel
Résolu/Fermé
Assiatout
Messages postés
3
Date d'inscription
lundi 1 décembre 2014
Statut
Membre
Dernière intervention
1 décembre 2014
-
1 déc. 2014 à 10:40
Maurice - 1 déc. 2014 à 11:52
Maurice - 1 déc. 2014 à 11:52
A voir également:
- Changement de couleur selon une date sur Excel
- Excel cellule couleur si condition texte - Guide
- Liste déroulante excel - Guide
- Calculer une moyenne sur excel - Guide
- Déplacer une colonne excel - Guide
- Changer de dns - Guide
4 réponses
via55
Messages postés
14512
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
18 janvier 2025
2 741
1 déc. 2014 à 10:53
1 déc. 2014 à 10:53
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
Assiatout
Messages postés
3
Date d'inscription
lundi 1 décembre 2014
Statut
Membre
Dernière intervention
1 décembre 2014
1 déc. 2014 à 11:06
1 déc. 2014 à 11:06
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
Assiatout
Messages postés
3
Date d'inscription
lundi 1 décembre 2014
Statut
Membre
Dernière intervention
1 décembre 2014
1 déc. 2014 à 11:22
1 déc. 2014 à 11:22
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)))
via55
Messages postés
14512
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
18 janvier 2025
2 741
Modifié par via55 le 1/12/2014 à 11:38
Modifié par via55 le 1/12/2014 à 11:38
Bien
Merci de passer en résolu (en haut à droite)
la formule finale peut être aussi plus simplement :=AND(TODAY()>$F1+10;$G1="";$F1<>""))
Cdlmnt
Merci de passer en résolu (en haut à droite)
la formule finale peut être aussi plus simplement :=AND(TODAY()>$F1+10;$G1="";$F1<>""))
Cdlmnt
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