Bonjour a toutes et tous.
Petit problème de MFC
J'ai un tableau de 4 colonnes
1er: dates du 01/01 au 31/12
2e: sans importance
3e: des Kms partiels
4e: des Kms en cumul
avec comme 1er MFC "=$B4=AUJOURDHUI()" j'applique un motif aux cellules
correspondantes a la date du jour (ça marche)
avec comme 2e MFC "=OU(JOURSEM($B4;2)=6;JOURSEM($B4;2)=7)"j'applique un
motif aux cellules correspondantes aux week-end(ça marche)
avec comme 3er MFC "=$E4<$H4"j'applique une police aux cellules dont le
cumul est inférieur au cumul d'un autre tableau : ça marche sauf si on est
un week-end et que le cumul est inférieur ou si on est a la date du jour et
que le cumul est inférieur.Dans ces deux cas la 1er ou 2e condition ayant
été rencontré la 3e est omise (ce qui est normal la MFC réagissant par
rapport a ce que j'ai écris).
J'ai essayé de modifié l'ordre des conditions mais y'a toujours quelque
chose qui manque!
Y a t-il une solution?
Et quelle serait-elle?
En esperant avoir été clair
Merci de vos réponses
yannick
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
ChrisV
Bonjour Yan,
Avec la MEFC suivante sur la plage B4:D368 Condition 1: La formule est: =$B4=AUJOURDHUI() Format: Motif: Rouge Condition 2: La formule est: =JOURSEM($B4;2)>5 Format: Motif: Vert
Avec la MEFC suivante sur la plage D4:D368 Condition 1: La formule est: =(B4=AUJOURDHUI())*(E4<H4) Format: Motif: Rouge, Police: Gras/Blanc Condition 2: La formule est: =(JOURSEM(B4;2)>5)*(E4<H4) Format: Motif: Vert, Police: Gras/Blanc Condition 3: La formule est: =JOURSEM(B4;2)>5 Format: Motif: Vert
Et dans la feuille de code de l'onglet "2005"
Private Sub Worksheet_Change(ByVal Target As Range) Dim c As Range If Not Intersect(Target.Cells, Range("réalisé")) Is Nothing Then For Each c In Range(Target.Offset(, 1), _ Target.Offset(, 1).End(xlDown)) If c < c.Offset(, 3) Then c.Font.ColorIndex = 3: c.Font.Bold = True Else c.Font.ColorIndex = xlAutomatic: c.Font.Bold = False End If Next c End If End Sub
ChrisV
"yan" a écrit dans le message de news: 42457d11$0$19357$
Bonjour a toutes et tous. Petit problème de MFC J'ai un tableau de 4 colonnes 1er: dates du 01/01 au 31/12 2e: sans importance 3e: des Kms partiels 4e: des Kms en cumul avec comme 1er MFC "=$B4=AUJOURDHUI()" j'applique un motif aux cellules correspondantes a la date du jour (ça marche) avec comme 2e MFC "=OU(JOURSEM($B4;2)=6;JOURSEM($B4;2)=7)"j'applique un motif aux cellules correspondantes aux week-end(ça marche) avec comme 3er MFC "=$E4<$H4"j'applique une police aux cellules dont le cumul est inférieur au cumul d'un autre tableau : ça marche sauf si on est un week-end et que le cumul est inférieur ou si on est a la date du jour et que le cumul est inférieur.Dans ces deux cas la 1er ou 2e condition ayant été rencontré la 3e est omise (ce qui est normal la MFC réagissant par rapport a ce que j'ai écris). J'ai essayé de modifié l'ordre des conditions mais y'a toujours quelque chose qui manque! Y a t-il une solution? Et quelle serait-elle? En esperant avoir été clair Merci de vos réponses yannick
Bonjour Yan,
Avec la MEFC suivante sur la plage B4:D368
Condition 1: La formule est: =$B4=AUJOURDHUI()
Format: Motif: Rouge
Condition 2: La formule est: =JOURSEM($B4;2)>5
Format: Motif: Vert
Avec la MEFC suivante sur la plage D4:D368
Condition 1: La formule est: =(B4=AUJOURDHUI())*(E4<H4)
Format: Motif: Rouge, Police: Gras/Blanc
Condition 2: La formule est: =(JOURSEM(B4;2)>5)*(E4<H4)
Format: Motif: Vert, Police: Gras/Blanc
Condition 3: La formule est: =JOURSEM(B4;2)>5
Format: Motif: Vert
Et dans la feuille de code de l'onglet "2005"
Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
If Not Intersect(Target.Cells, Range("réalisé")) Is Nothing Then
For Each c In Range(Target.Offset(, 1), _
Target.Offset(, 1).End(xlDown))
If c < c.Offset(, 3) Then
c.Font.ColorIndex = 3: c.Font.Bold = True
Else
c.Font.ColorIndex = xlAutomatic: c.Font.Bold = False
End If
Next c
End If
End Sub
ChrisV
"yan" <xyz@wanadoo.fr> a écrit dans le message de news:
42457d11$0$19357$8fcfb975@news.wanadoo.fr...
Bonjour a toutes et tous.
Petit problème de MFC
J'ai un tableau de 4 colonnes
1er: dates du 01/01 au 31/12
2e: sans importance
3e: des Kms partiels
4e: des Kms en cumul
avec comme 1er MFC "=$B4=AUJOURDHUI()" j'applique un motif aux cellules
correspondantes a la date du jour (ça marche)
avec comme 2e MFC "=OU(JOURSEM($B4;2)=6;JOURSEM($B4;2)=7)"j'applique un
motif aux cellules correspondantes aux week-end(ça marche)
avec comme 3er MFC "=$E4<$H4"j'applique une police aux cellules dont le
cumul est inférieur au cumul d'un autre tableau : ça marche sauf si on est
un week-end et que le cumul est inférieur ou si on est a la date du jour
et
que le cumul est inférieur.Dans ces deux cas la 1er ou 2e condition ayant
été rencontré la 3e est omise (ce qui est normal la MFC réagissant par
rapport a ce que j'ai écris).
J'ai essayé de modifié l'ordre des conditions mais y'a toujours quelque
chose qui manque!
Y a t-il une solution?
Et quelle serait-elle?
En esperant avoir été clair
Merci de vos réponses
yannick
Avec la MEFC suivante sur la plage B4:D368 Condition 1: La formule est: =$B4=AUJOURDHUI() Format: Motif: Rouge Condition 2: La formule est: =JOURSEM($B4;2)>5 Format: Motif: Vert
Avec la MEFC suivante sur la plage D4:D368 Condition 1: La formule est: =(B4=AUJOURDHUI())*(E4<H4) Format: Motif: Rouge, Police: Gras/Blanc Condition 2: La formule est: =(JOURSEM(B4;2)>5)*(E4<H4) Format: Motif: Vert, Police: Gras/Blanc Condition 3: La formule est: =JOURSEM(B4;2)>5 Format: Motif: Vert
Et dans la feuille de code de l'onglet "2005"
Private Sub Worksheet_Change(ByVal Target As Range) Dim c As Range If Not Intersect(Target.Cells, Range("réalisé")) Is Nothing Then For Each c In Range(Target.Offset(, 1), _ Target.Offset(, 1).End(xlDown)) If c < c.Offset(, 3) Then c.Font.ColorIndex = 3: c.Font.Bold = True Else c.Font.ColorIndex = xlAutomatic: c.Font.Bold = False End If Next c End If End Sub
ChrisV
"yan" a écrit dans le message de news: 42457d11$0$19357$
Bonjour a toutes et tous. Petit problème de MFC J'ai un tableau de 4 colonnes 1er: dates du 01/01 au 31/12 2e: sans importance 3e: des Kms partiels 4e: des Kms en cumul avec comme 1er MFC "=$B4=AUJOURDHUI()" j'applique un motif aux cellules correspondantes a la date du jour (ça marche) avec comme 2e MFC "=OU(JOURSEM($B4;2)=6;JOURSEM($B4;2)=7)"j'applique un motif aux cellules correspondantes aux week-end(ça marche) avec comme 3er MFC "=$E4<$H4"j'applique une police aux cellules dont le cumul est inférieur au cumul d'un autre tableau : ça marche sauf si on est un week-end et que le cumul est inférieur ou si on est a la date du jour et que le cumul est inférieur.Dans ces deux cas la 1er ou 2e condition ayant été rencontré la 3e est omise (ce qui est normal la MFC réagissant par rapport a ce que j'ai écris). J'ai essayé de modifié l'ordre des conditions mais y'a toujours quelque chose qui manque! Y a t-il une solution? Et quelle serait-elle? En esperant avoir été clair Merci de vos réponses yannick