Tester les cellules en fonction de la date

pad01

XLDnaute Occasionnel
Bonsoir le Forum,
J'ai un classeur où je dois tester les dates inscrites. Si elles sont inférieures à celle du jour actuelle, le fond de la cellule devient rouge.
Je voudrai faire la même opération mais avoir la cellule en rouge 30 jours avant.
Je joins un fichier exemple
Merci de l'aide
 

Fichiers joints

R@chid

XLDnaute Barbatruc
Re : Tester les cellules en fonction de la date

Bonsoir,
Essai avec MFC
Si j'ai bien compris, si c'est pas ca alors il faut mettre autres dates et les colorer manuellement.
voir PJ
Bonne Soiree
 

Fichiers joints

pad01

XLDnaute Occasionnel
Re : Tester les cellules en fonction de la date

Bonsoir le Forum, Bonsoir Rachid_0661
Merci pour la solution mais je désirerai avoir cette solution mais en vba. Par contre c'est la date du jour + 30 jours, je fais une erreur dans l'énoncé de mon problème.
Je joins un nouveau fichier exemple
Merci Rachid_0661
 

Fichiers joints

Pierrot93

XLDnaute Barbatruc
Re : Tester les cellules en fonction de la date

Bonjour Pad, Rachid:)

essaye peut être ceci :
Code:
Private Sub Workbook_Open()
Dim cell As Range
For Each cell In Range("A2:A5")
    If cell.Value < DateAdd("y", 30, Date) Then cell.Interior.ColorIndex = 3
Next cell
End Sub
bonne journée
@+
 

pad01

XLDnaute Occasionnel
Re : Tester les cellules en fonction de la date

Bonjour le Forum, Rachid et Pierrot93
Merci Pierrot. C'est la solution que j'attendais.
C'est super
Bonne journée à tous
@ +
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas