Colorer quand date limite depassée

Bonsoir à toutes et à tous.

j'ai besoin de votre pour une autre chose.

J'ai un tableau qui va de A à I

dans F j'ai une date limite de paiement. ex : 30/04/2016

Si j'ouvre mon classeur et que nous sommes le 02/05/2016, j'aimerais que les cellules A, B, C, D, E, F, G, H, I se colore en rouge SAUF si dans la colonne I la lettre x est présente.

Est-ce possible?

Bonsoir

essayer ca

Bonjour,

Une formule de MFC dans les cellules correspondantes :

=ET($I1<>"x";$F1<AUJOURDHUI())

Bonsoir Amir,

j'ai essayé et ca ne fonctionne pas. voici le classeur en pièce jointe

bonsoir

je ne voi pas le classeur en pièce jointe

BONSOIR

essayer ca et n oublier pas que ce code exige l activaion des macros lor de ouverture !? :

Re,

Vois dans le fichier ci-retourné.

Bonjour Raja, magnifique !! merci beaucoup. Amir ton classeur me fait un debogage. mais celui de Raja fonctionne merci.

J'ai tenté de l'adapter à ma feuille avec mes données perso.

Le soucis c'est que j'ai deja une mise en forme conditionnelle

=SI($I3="x";1;0) qui s'applique à =$A$3:$I$337

En gros dès que je met une x dans la colonne I ca me colorie en vert les cellules de A à I

Et quand je tente d'inserer ta formule dans ma feuille, je n'ai pas le resultat souhaité.

Une idée.

Re,

Un code par VBA qui fait la même chose. Le code à insérer dans le module de la Feuille "BDD".

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("I1:I" & Range("A" & Rows.Count).End(xlUp).Row)) Is Nothing Then
        If Target.Offset(0, -3) < Date And Target <> "x" Then
            Range(Target.Offset(0, -8), Target).Interior.ColorIndex = 3
        Else
            Range(Target.Offset(0, -8), Target).Interior.ColorIndex = 2
        End If
    End If
End Sub

C'est quoi la feuille BDD?

edit : ah tu parle de la feuille du classeur de AMIR

Car sur celui que j'ai mis en ligne (le dernier) il n'y a pas de feuille BDD

BONSOIR

veut dire "base de donnée" la feuille ou figure ton tableau

je pense que tu n a pas essayer mon dernier fichier " PAIMENT.xlsm"

retélécharger mon fichier puis activer les macros

BONSOIR

essayer ca et n oublier pas que ce code exige l activaion des macros lor de ouverture !? :

colorer le tableau en blanc >> enregistrer >> et fermer le >>> puis reourir

Amir quand je l'ouvre, il me demande si je veut modifier la date du 19 mai je répond NON

et ensuite j'ai erreur d’exécution 1004 la méthode 'rows' de l'objet '_global a échoué

et me colorie en jaune ceci

nb = .Range("F" & Rows.Count).End(xlUp).Row

Amir,

je ne sais pas ce que j'ai fait, mais ca fonctionne maintenant. merci !!

Le seul truc qu'il reste à faire, c'est que quand j'inscrit un x dans la colonne I, je souhaite que les colonnes se mettent en vert.

et quand j'efface le x ca redevient à la couleur de base.

tu as une idée? dois-je modifier ta regle, ou bien en creer une nouvelle?

Peu importe la solution, pourrais tu m'aider ?

bonsoir

essayer ca