Date en rouge quand elle approche
Résolu
Narwe
Messages postés
101
Date d'inscription
Statut
Membre
Dernière intervention
-
Vaucluse Messages postés 26496 Date d'inscription Statut Contributeur Dernière intervention -
Vaucluse Messages postés 26496 Date d'inscription Statut Contributeur Dernière intervention -
A voir également:
- Date en rouge quand elle approche
- Telecommande free clignote rouge - Forum TV & Vidéo
- Freeplug rouge ✓ - Forum Réseau
- Pon rouge sfr ✓ - Forum Fibre Optique
- Plug free rouge - Forum Freebox
- Problème télécommande Freebox mini 4K reste rouge - Forum Box et Streaming vidéo
3 réponses
Bonjour
sélectionnez le champ à traiter
Ruban / Accueil / Mise en forme conditionnelle
"nouvelle règle" et "utiliser une formule..."
la formule à entrer dans le cadre:
=A1<AUJOURDHUI()+5
cliquez sur format / Formatez et OK
revenez à la fenêtre de MFC / "nouvelle régle"
rajouter la règle qui correspond au tampon que vous souhaitez
et même opération
attention les règles s'appliquent dans le sens où elles sont placées dans la liste de la fenêtre. Utilisez les flèches ascenseur pour les placer dans le bonne ordre
crdlmnt
sélectionnez le champ à traiter
Ruban / Accueil / Mise en forme conditionnelle
"nouvelle règle" et "utiliser une formule..."
la formule à entrer dans le cadre:
=A1<AUJOURDHUI()+5
cliquez sur format / Formatez et OK
revenez à la fenêtre de MFC / "nouvelle régle"
rajouter la règle qui correspond au tampon que vous souhaitez
et même opération
attention les règles s'appliquent dans le sens où elles sont placées dans la liste de la fenêtre. Utilisez les flèches ascenseur pour les placer dans le bonne ordre
crdlmnt
bonsoir
Ou par VBA
Dans l'exemple pour les cellules de A1 à A100
A+
Ou par VBA
Dans l'exemple pour les cellules de A1 à A100
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Cell As Range
For Each Cell In Range("A1:A100")
If Cell = "" Then
Cell.Interior.ColorIndex = xlNone
ElseIf Cell >= Date Then
Cell.Interior.ColorIndex = 3
ElseIf Cell <= Date - 1 And Cell > Date - 7 Then
Cell.Interior.ColorIndex = 46
ElseIf Cell <= Date - 7 Then
Cell.Interior.ColorIndex = 4
End If
Next
End Sub
A+
Merci pour vos réponses,
J'ai essayer tout d'abord celle de M.Vaucluse et le résultat est que la date s'affiche en rouge immédiatement et ce pour n'importe quelles dates, je pense donc que je n'ai pas réussi à la mettre en place correctement.
Ayant peu de base sur excel, un exercice simple peut rapidement devenir compliqué.
La solution proposé par lynyrd1960 me donne un résultat immédiat, mais je ne sait comment adapté la formule à mes cellules, j'ai plusieurs cellules qui sont séparer d'autre ( B6 à B10, B17, C4 à C8, ...) pouvez vous m'expliquer comment m'y prendre pour adapter le code ?
pouvez vous aussi m'expliquer comment changer les dates ainsi que les couleurs car ce que je souhaite est que par exemple :
Nous sommes aujourd'hui le 12/03/2014
que toutes les dates antérieurs à partir du 12/03/2014 inclus soit en rouge
que toutes celles compris entre le 13/03/2014 et le 19/03/2014 soit en orange
que toutes celles compris entre le 20/03/2014 et le 13/04/2014 soit en vert
et que toutes celles qui soit plus loin que le 13/04/2014 n'ai pas de couleur particulières.
En vous remerciant
J'ai essayer tout d'abord celle de M.Vaucluse et le résultat est que la date s'affiche en rouge immédiatement et ce pour n'importe quelles dates, je pense donc que je n'ai pas réussi à la mettre en place correctement.
Ayant peu de base sur excel, un exercice simple peut rapidement devenir compliqué.
La solution proposé par lynyrd1960 me donne un résultat immédiat, mais je ne sait comment adapté la formule à mes cellules, j'ai plusieurs cellules qui sont séparer d'autre ( B6 à B10, B17, C4 à C8, ...) pouvez vous m'expliquer comment m'y prendre pour adapter le code ?
pouvez vous aussi m'expliquer comment changer les dates ainsi que les couleurs car ce que je souhaite est que par exemple :
Nous sommes aujourd'hui le 12/03/2014
que toutes les dates antérieurs à partir du 12/03/2014 inclus soit en rouge
que toutes celles compris entre le 13/03/2014 et le 19/03/2014 soit en orange
que toutes celles compris entre le 20/03/2014 et le 13/04/2014 soit en vert
et que toutes celles qui soit plus loin que le 13/04/2014 n'ai pas de couleur particulières.
En vous remerciant
Bonsoir
en fait il manquait effectivement une info dans ma proposition, qui passait en rouge toutes les cellules inférieures, même vide. Reprenons donc en fonction de votre liste:
que toutes les dates antérieurs à partir du 12/03/2014 inclus soit en rouge
=ET(A1<>"";A1<=AUJOURDHUI())
que toutes celles compris entre le 13/03/2014 et le 19/03/2014 soit en orange
=ET(A1<>"";A1>AUJOURDHUI();A1<=AUJOURDHUI()+7)
que toutes celles compris entre le 20/03/2014 et le 13/04/2014 soit en vert
=ET(A1<>"";A1>AUJOURDHUI();A1<AUJOURDHUI()+30)
ou pour être plus précis selon le nombre de jours du mois
=ET(A1<>"";A1>AUJOURDHUI();A1<DATE(ANNEE(A1);MOIS(A1)+1;JOUR(A1)))
et que toutes celles qui soit plus loin que le 13/04/2014 n'ai pas de couleur particulières.
donc rien
Attention bien placer les MFC dans cet ordre pour qu'elles s'appliquent correctement (utilisez les flêches ascenseur de la fenêtre de MFC pour les placer
Crdlmnt
en fait il manquait effectivement une info dans ma proposition, qui passait en rouge toutes les cellules inférieures, même vide. Reprenons donc en fonction de votre liste:
que toutes les dates antérieurs à partir du 12/03/2014 inclus soit en rouge
=ET(A1<>"";A1<=AUJOURDHUI())
que toutes celles compris entre le 13/03/2014 et le 19/03/2014 soit en orange
=ET(A1<>"";A1>AUJOURDHUI();A1<=AUJOURDHUI()+7)
que toutes celles compris entre le 20/03/2014 et le 13/04/2014 soit en vert
=ET(A1<>"";A1>AUJOURDHUI();A1<AUJOURDHUI()+30)
ou pour être plus précis selon le nombre de jours du mois
=ET(A1<>"";A1>AUJOURDHUI();A1<DATE(ANNEE(A1);MOIS(A1)+1;JOUR(A1)))
et que toutes celles qui soit plus loin que le 13/04/2014 n'ai pas de couleur particulières.
donc rien
Attention bien placer les MFC dans cet ordre pour qu'elles s'appliquent correctement (utilisez les flêches ascenseur de la fenêtre de MFC pour les placer
Crdlmnt