Mise En Forme Conditionnelle

Bonjour

Un souci avec une MEFC

La date du jour en case R2

Un tableau de 9 colonnes ( important: Colonnes D à L )

Le tableau est réparti par groupe de 3 colonnes

• 1ére colonne une valeur (sans importance)
• 2ème colonne un texte (sans importance)
• 3ème colonne une date

Et j'ai fait une MEFC pour colorier les 3 cellules du groupe si deux conditions sont remplies

La 3ème colonne ne doit pas être vide

et

le mois de la date de la 3ème colonne doit être différent du mois en cours

Ma MEFC : La formule est

=ET(INDIRECT(ADRESSE(LIGNE();6+(ENT((COLONNE()-4)/3)*3)))<>"";MOIS(INDIRECT(ADRESSE(LIGNE();6+(ENT((COLONNE()-4)/3)*3))))<>MOIS($R$2))

Je n'ai pas trouvé plus simple

Si je scinde cette formule chaque partie fonctionne très bien

Mais ensemble rien n'y fait, quelque chose qui m'échappe mais quoi ?

Je dois mélanger les conditions, raisonner à l'envers mais je n'y arrive pas

Merci

Un petit fichier tout simple

Bonjour Banzai64

En faisant vite (Mme attend pour le repas)

dans le premier tableau et selon les conditions indiquées

=ET($F4<>"";MOIS($F4)<>MOIS(AUJOURDHUI()))

Tu me diras..

Cordialement

Bonsoir

Bon appétit quand même

mais cela ne fonctionne pas

La ligne 7 avec la date 01/03/2012 se colorise bien mais il ne faudrait pas toute la ligne juste les cases D7 à F7

La ligne 6 avec la date 01/01/2012 en I6 reste sans couleur

Merci

Bonsoir,

A tout hasard....

Par une fonction VBA?

Dans la formule :

=condition(D4)

et la fonction :

Function condition(Cel As Range) As Boolean
    Dim Col As Byte
    Col = IIf(Cel.Column Mod 3 = 0, 0, 3 - Cel.Column Mod 3)
    If Cel.Offset(, Col) <> "" And Month(Cel.Offset(, Col)) <> Month(Range("R2")) Then condition = True
End Function

Juste parce que je me sens plus à l'aise avec le VBA qu'avec les formules....

Amicalement

Bonne soirée

Bonsoir

Bien sur j'y avais pensé mais j'aimerais que cela se fasse par une MEFC "normale"

Merci quand même de l'intérêt que tu portes à cette question

cousinhub a écrit :

Juste parce que je me sens plus à l'aise avec le VBA qu'avec les formules....

Je comprends (les formules ne m'aiment pas non plus)

Bonsoir Banzai64

J'avoue que je patine un peu.

J'ai bien trouvé une formule qui marche hors MFC, mais qui refuse obstinément de fonctionner en MFC

Je regarde demain

Cordialement

Bonsoir

La formule que j'ai mise en MEFC fonctionne bien en dehors (elle me retourne VRAI ou FAUX) bien comme il faut mais dans la MEFC cela ne fonctionne plus

Comme ce n'est pas d'une importance capitale, il faut ne pas trop se casser la tête dessus

Si pas de solution je ne mettrai que la partie qui vérifie le mois

Bonne nuit

Bonsoir à tous,

Une solution de contournement. Mettre la MFC actuelle sous cette forme :

=(INDIRECT(ADRESSE(LIGNE();6+(ENT((COLONNE()-4)/3)*3)))<>"")*(MOIS(INDIRECT(ADRESSE(LIGNE();6+(ENT((COLONNE()-4)/3)*3))))<>MOIS($R$2))=1

Bonjour

Et voilà une solution quelle est excellente

Il fallait y penser chaque formule retourne VRAI ou FAUX (1 ou 0) et VRAI * VRAI = 1

Normalement le ET fait la même chose

Mais cela fonctionne et c'est tout ce qui compte

Merci et bonne nuit

Je ferme le post