Dans les options de la boite de dialogue Mise en Forme Conditionnelle, je n'ai pas trouvé "contient". Comment faire pour que la cellule change de couleur si elle contient "bonjour" dans une phrase ?
A1 avec mise en forme conditionnelle :
condition 1 La formule est : = Trouve("bonjour";A1)<>0
motif : Vert
condition 2 La formule est : = Trouve("au revoir";A1)<>0
motif : Rouge
condition 3 La formule est : = Trouve("adieu";A1)<>0
motif : Jaune
condition 1 La formule est : = Trouve("bonjour";A1)<>0
motif : Vert
condition 2 La formule est : = Trouve("au revoir";A1)<>0
motif : Rouge
condition 3 La formule est : = Trouve("adieu";A1)<>0
motif : Jaune
GeeDee,
Ajouté ou modifié le 25/08/2007 (N°1888)
Ajouté ou modifié le 25/08/2007 (N°1888)
Dans un tableau qui n'est pas trié par date, comment repérer les lignes comportant une date comprise dans les 12 derniers mois ?
Utilise une mise en forme conditionnelle :
Celle-ci met en couleur les lignes correspondant aux dates du mois en cours jusqu'à mois en cours - 12
Sélection A2:Bxxx --> MEFC --> la formule est :
=(>=DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())-12;1))*(<=DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())+1;0))
Celle-ci met en couleur les lignes correspondant aux dates du mois en cours jusqu'à mois en cours - 12
Sélection A2:Bxxx --> MEFC --> la formule est :
=(>=DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())-12;1))*(<=DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())+1;0))
Alain Vallon,
Ajouté ou modifié le 07/07/2007 (N°1859)
Ajouté ou modifié le 07/07/2007 (N°1859)
Comment utiliser la mefc pour mettre en jaune une valeur dans un tableau sur une feuille si celle-ci apparaît aussi à la même position dans un autre tableau sur une autre feuille ?
Deux valeurs à la même position sur deux feuilles seront identiques si la formule
=INDIRECT("Feuil1!" &ADRESSE(LIGNE();COLONNE()))
renvoie vrai
Dans le menu insertion/nom/définir, définis un nom (ici zzz) faisant référence à cette formule
zzz=INDIRECT("Feuil1!" &ADRESSE(LIGNE();COLONNE()))
On pourra alors utiliser ce nom dans la formule de la mise en forme conditionnelle :
Sur la feuille 2, sélectionnez la cellule A1, menu format/mise en forme conditionnelle, la formule est
=ET(A2<>"";A2=zzz)
choisis alors ta couleur !
Cette astuce est illustrée dans ce classeur exemple :
av-mefc2feuilles (téléchargé 4723 fois)
=INDIRECT("Feuil1!" &ADRESSE(LIGNE();COLONNE()))
renvoie vrai
Dans le menu insertion/nom/définir, définis un nom (ici zzz) faisant référence à cette formule
zzz=INDIRECT("Feuil1!" &ADRESSE(LIGNE();COLONNE()))
On pourra alors utiliser ce nom dans la formule de la mise en forme conditionnelle :
Sur la feuille 2, sélectionnez la cellule A1, menu format/mise en forme conditionnelle, la formule est
=ET(A2<>"";A2=zzz)
choisis alors ta couleur !
Cette astuce est illustrée dans ce classeur exemple :av-mefc2feuilles (téléchargé 4723 fois)
Alain Vallon,
Ajouté ou modifié le 18/09/2005 (N°1661)
Ajouté ou modifié le 18/09/2005 (N°1661)
Je voudrais faire varier la couleur de mes données en fonction ducontenu de la cellule
mais la mise en forme conditionnelle est limitée à 3 formats et j'en ai besoin de 7.
La mise en forme condtionnelle (mefc) est en fait limitée à 4 formats : il ne faut pas
oublier le format de base...
Mais si tes données s'y prêtent, tu peux aller jusqu'à 7 en combinant la mefc avec les
formats personnalisés qui eux te permettent d'appliquer un style différent à tes données
suivant que ce sont des nombres positifs, négatifs, nuls ou du texte.
Cette astuce est illustrée dans ce classeur exemple :
av-7couleursconditionnelles (téléchargé 12028 fois)
oublier le format de base...
Mais si tes données s'y prêtent, tu peux aller jusqu'à 7 en combinant la mefc avec les
formats personnalisés qui eux te permettent d'appliquer un style différent à tes données
suivant que ce sont des nombres positifs, négatifs, nuls ou du texte.
Cette astuce est illustrée dans ce classeur exemple :av-7couleursconditionnelles (téléchargé 12028 fois)
Alain Vallon,
Ajouté ou modifié le 22/05/2005 (N°1628)
Ajouté ou modifié le 22/05/2005 (N°1628)
Je voudrais mettre en rouge une cellule si sa valeur est égale à celle présente sur une
autre feuille.
Dans une MEFC tu ne peux faire appel pour une formule qu'à des cellules situées sur la
même feuille.
Mais on peut ruser en faisant appel à un nom qui lui-même intègrera la référence à une
autre
feuille
Exemple pour ta question :
"Appliquer une MEFC qui comparera les cellules de la plage A1:B10 de "Feuil2"
aux cellules la même plage de "Feuil1"
Insertion > Nom > Définir > Nom dans le classeur > "zzz" > fait référence à
=INDIRECT("Feuil1!" &ADRESSE(LIGNE();COLONNE()))
Pour l'application de la MEFC :
En "Feuil2" sélection A1:B10 > MEFC > la formule est :
=A1= zzz
Ensuite tu choisis ton motif
même feuille.
Mais on peut ruser en faisant appel à un nom qui lui-même intègrera la référence à une
autre
feuille
Exemple pour ta question :
"Appliquer une MEFC qui comparera les cellules de la plage A1:B10 de "Feuil2"
aux cellules la même plage de "Feuil1"
Insertion > Nom > Définir > Nom dans le classeur > "zzz" > fait référence à
=INDIRECT("Feuil1!" &ADRESSE(LIGNE();COLONNE()))
Pour l'application de la MEFC :
En "Feuil2" sélection A1:B10 > MEFC > la formule est :
=A1= zzz
Ensuite tu choisis ton motif
Alain Vallon,
Ajouté ou modifié le 05/05/2005 (N°1621)
Ajouté ou modifié le 05/05/2005 (N°1621)
Pour utiliser la fonction PGCD, il me faut activer l'Utilitaire d'analyse.
Mais alors, il est impossible d'utiliser PGCD dans une mise en forme
conditionnelle.
Une astuce pour utiliser les fonctions amenées par des xla (dont l'utilitaire
d'analyse) est de définir un nom et de l'utiliser ensuite dans la MFEC
Exemple pour mettre en évidence le PGCD dans la plage A1:A10
Insertion > Nom définir > "zz" > fait référence à :
= PGCD(Feuil1!$1:$10)
Dans la MEFC (après sélection de A1:A10), la formule est : =A1= zz
d'analyse) est de définir un nom et de l'utiliser ensuite dans la MFEC
Exemple pour mettre en évidence le PGCD dans la plage A1:A10
Insertion > Nom définir > "zz" > fait référence à :
= PGCD(Feuil1!$1:$10)
Dans la MEFC (après sélection de A1:A10), la formule est : =A1= zz
Alain vallon,
Ajouté ou modifié le 02/04/2005 (N°1597)
Ajouté ou modifié le 02/04/2005 (N°1597)
Comment masquer les valeurs d'erreur dans une feuille ?
Utilise une mise en forme conditionnelle :
Avec la plage A1:D20
Sélection de la plage --> MEFC --> la formule est :
=ESTERR(A1)
Format de police --> même couleur que le fond (blanc ?)
Avec la plage A1:D20
Sélection de la plage --> MEFC --> la formule est :
=ESTERR(A1)
Format de police --> même couleur que le fond (blanc ?)
Alain vallon,
Ajouté ou modifié le 05/03/2005 (N°1588)
Ajouté ou modifié le 05/03/2005 (N°1588)
Comment appliquer un format à une cellule en fonction de la valeur d'une autre ?
Utilise la mise en forme conditionnelle.
Dans la boite de dialogue, il faut choisir "La formule est" au lieu de "La
valeur de la cellule est"
et en regard de cette locution, mette la formule désirée.
Ainsi, si je désire formater B1 si A1 > 100, je mettrai
"La formule est " puis à côté =A1>100
Cette astuce est illustrée dans ce classeur exemple :
av-mefc (téléchargé 28803 fois)
Dans la boite de dialogue, il faut choisir "La formule est" au lieu de "La
valeur de la cellule est"
et en regard de cette locution, mette la formule désirée.
Ainsi, si je désire formater B1 si A1 > 100, je mettrai
"La formule est " puis à côté =A1>100
Cette astuce est illustrée dans ce classeur exemple :av-mefc (téléchargé 28803 fois)
Pierre Fauconnier, (N°502)
Peut on avec une MEFC (mise en forme conditionnelle) afficher un calendrier avec les jours
fériés en couleur.
On peut faire cela avec la MEFC et même beaucoup beaucoup plus que ça !
Pour t'en convaincre, télécharge ce classeur. Il contient 58 exemples !
recherche de doublons
formatages de dates
recherche dans une cellule
recherche dns une colonne
comparaisons entre deux plages...
Les applications sont multiples
Cette astuce est illustrée dans ce classeur exemple :
av-mefc (téléchargé 28803 fois)
Pour t'en convaincre, télécharge ce classeur. Il contient 58 exemples !
recherche de doublons
formatages de dates
recherche dans une cellule
recherche dns une colonne
comparaisons entre deux plages...
Les applications sont multiples
Cette astuce est illustrée dans ce classeur exemple :av-mefc (téléchargé 28803 fois)
Alain Vallon, (N°501)
On ne peut vraiment pas mettre 4 couleurs dans une mise en forme conditionnelle ?
Voici la quatrième couleur du format conditionnel qui n'en accepte que trois de façon standard.
Sélectionner au préalable la plage et lui attribuer une couleur de fond de
cellule, puis appliquer le format condi. Ainsi, il y a 4 couleurs.
Et pour dépasser la limite des 3 couleurs pour la mise en forme conditionnelle Par Vba:
Double clic sur la feuille concernée et y mettre cette macro
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Select Case UCase(Target) 'UCASE = convertion de la frappe en
majuscule
Case "ZAZA"
With Selection.Interior
.ColorIndex = 7
.Pattern = xlSolid
End With
Case "ZEZETTE"
With Selection.Interior
.ColorIndex = 8
.Pattern = xlSolid
End With
Case "JEAN-PAUL"
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
Case "PAUL"
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
End Select
End Sub
Sélectionner au préalable la plage et lui attribuer une couleur de fond de
cellule, puis appliquer le format condi. Ainsi, il y a 4 couleurs.
Et pour dépasser la limite des 3 couleurs pour la mise en forme conditionnelle Par Vba:
Double clic sur la feuille concernée et y mettre cette macro
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Select Case UCase(Target) 'UCASE = convertion de la frappe en
majuscule
Case "ZAZA"
With Selection.Interior
.ColorIndex = 7
.Pattern = xlSolid
End With
Case "ZEZETTE"
With Selection.Interior
.ColorIndex = 8
.Pattern = xlSolid
End With
Case "JEAN-PAUL"
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
Case "PAUL"
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
End Select
End Sub
Jacques Thiernesse, ...Patrick MacKay, (N°500)
Comment faire pour mettre en rouge la fonte de toutes mes cellules qui contiennent un nombre
pair ?
Si tu veux mettre en rouge les nombres pairs de la plage A1:F10:
1-clique sur A1 et glisse jusqu'à F10
2-Format/Mise en forme conditionnelle
3-dans la liste déroulante "condition 1", sélectionne "la formule est" et
entre la formule suivante:
=PAIR(A1)=A1
ou encore =MOD(A1;2)=0
4- clique sur le bouton "Format" et sélectionne la couleur rouge
5- OK...OK...
Cette astuce est illustrée dans ce classeur exemple :
av-mefc (téléchargé 28803 fois)
1-clique sur A1 et glisse jusqu'à F10
2-Format/Mise en forme conditionnelle
3-dans la liste déroulante "condition 1", sélectionne "la formule est" et
entre la formule suivante:
=PAIR(A1)=A1
ou encore =MOD(A1;2)=0
4- clique sur le bouton "Format" et sélectionne la couleur rouge
5- OK...OK...
Cette astuce est illustrée dans ce classeur exemple :av-mefc (téléchargé 28803 fois)
Laurent Mortézai, ChrisV, (N°499)
Je voudrais récupérer l'index de la couleur appliquée par une mise en forme conditionnelle dans
mes cellules. Comment faire ?
Utilise cette macro :
Sub ElleEstBelleMaMEFC()
'Laurent Longre, MPFE, correction 2003
Dim FC As FormatCondition, F1, F2
Dim C As Range
Set C = Cells.Find(Empty)
Application.ScreenUpdating = False
For Each FC In ActiveCell.FormatConditions
C.FormulaLocal = FC.Formula1: F1 = C
If FC.Type = xlCellValue Then
Select Case FC.Operator
Case xlBetween, xlNotBetween:
C.FormulaLocal = FC.Formula2: F2 = C
If FC.Operator = xlBetween Then If ActiveCell >= F1 _
And ActiveCell <= F2 Then Exit For
If ActiveCell < F1 _
Or ActiveCell > F2 Then Exit For
Case xlEqual: If ActiveCell = F1 Then Exit For
Case xlGreater: If ActiveCell > F1 Then Exit For
Case xlGreaterEqual: If ActiveCell >= F1 Then Exit For
Case xlLess: If ActiveCell < F1 Then Exit For
Case xlLessEqual: If ActiveCell <= F1 Then Exit For
Case xlNotEqual: If ActiveCell <> F1 Then Exit For
End Select
Else
If F1 Then Exit For
End If
Next FC
If Not FC Is Nothing Then MsgBox FC.Interior.ColorIndex _
Else MsgBox ActiveCell.Interior.ColorIndex
C.Clear
End Sub
Sub ElleEstBelleMaMEFC()
'Laurent Longre, MPFE, correction 2003
Dim FC As FormatCondition, F1, F2
Dim C As Range
Set C = Cells.Find(Empty)
Application.ScreenUpdating = False
For Each FC In ActiveCell.FormatConditions
C.FormulaLocal = FC.Formula1: F1 = C
If FC.Type = xlCellValue Then
Select Case FC.Operator
Case xlBetween, xlNotBetween:
C.FormulaLocal = FC.Formula2: F2 = C
If FC.Operator = xlBetween Then If ActiveCell >= F1 _
And ActiveCell <= F2 Then Exit For
If ActiveCell < F1 _
Or ActiveCell > F2 Then Exit For
Case xlEqual: If ActiveCell = F1 Then Exit For
Case xlGreater: If ActiveCell > F1 Then Exit For
Case xlGreaterEqual: If ActiveCell >= F1 Then Exit For
Case xlLess: If ActiveCell < F1 Then Exit For
Case xlLessEqual: If ActiveCell <= F1 Then Exit For
Case xlNotEqual: If ActiveCell <> F1 Then Exit For
End Select
Else
If F1 Then Exit For
End If
Next FC
If Not FC Is Nothing Then MsgBox FC.Interior.ColorIndex _
Else MsgBox ActiveCell.Interior.ColorIndex
C.Clear
End Sub
Laurent Longre, (N°498)
Etant donné une série de cellules mises en forme conditionnellement suivant leur valeur,
comment, dans une copie de ces cellules, conserver et "fixer" cette mise en forme ?
supposons qu'il y ait à reproduire en
cellule B1:B10 la couleur de
la cellule A1 qui résulte d'un format conditionnel
Sub Macro1()
Range("B1:B10").Interior.ColorIndex = _
Range("A1").FormatConditions(1).Interior.ColorIndex
End Sub
Pour ce qui est de coller, on peut bien sur copier avec le format
conditionnel, mais je pense que le but est de fixer le format des cellules,
et là ce n'est pas forcément évident, tout dépend de la formule conditionnelle
si la formule est par ex =LIGNE()=5, la condition sera remplie en ligne 5,
si on copie la cellule et on la colle ligne 7, la condition ne sera plus
remplie et le format sera modifié...
s'il n'y a qu'une condition c'est pas un problème, la commande suivante fait l'affaire
If Range("A1") = Range("A1").FormatConditions(1).Formula1 Then
Range("B1:B10")._
Interior.ColorIndex = Range("A1").FormatConditions(1).Interior.ColorIndex
par contre s'il y a plus d'une condition
il faut les inclure dans la macro ce qui oblige à vérifier chaque formule en vba
tu verras ce qui arrive à B1:B10 en mettant comme conditions pour la cellule A1 :
=1 rouge
=2 vert
=3 bleu
If Range("A1") = Range("A1").FormatConditions(1).Formula1 Then
Range("B1:B10").Interior.ColorIndex = _
Range("A1").FormatConditions(1).Interior.ColorIndex
ElseIf Range("A1") = Range("A1").FormatConditions(2).Formula1 Then
Range("B1:B10").Interior.ColorIndex = _
Range("A1").FormatConditions(2).Interior.ColorIndex
ElseIf Range("A1") = Range("A1").FormatConditions(3).Formula1 Then
Range("B1:B10").Interior.ColorIndex = _
Range("A1").FormatConditions(3).Interior.ColorIndex
Else
Range("B1:B10").Interior.ColorIndex = Range("A1").Interior.ColorIndex
End If
cellule B1:B10 la couleur de
la cellule A1 qui résulte d'un format conditionnel
Sub Macro1()
Range("B1:B10").Interior.ColorIndex = _
Range("A1").FormatConditions(1).Interior.ColorIndex
End Sub
Pour ce qui est de coller, on peut bien sur copier avec le format
conditionnel, mais je pense que le but est de fixer le format des cellules,
et là ce n'est pas forcément évident, tout dépend de la formule conditionnelle
si la formule est par ex =LIGNE()=5, la condition sera remplie en ligne 5,
si on copie la cellule et on la colle ligne 7, la condition ne sera plus
remplie et le format sera modifié...
s'il n'y a qu'une condition c'est pas un problème, la commande suivante fait l'affaire
If Range("A1") = Range("A1").FormatConditions(1).Formula1 Then
Range("B1:B10")._
Interior.ColorIndex = Range("A1").FormatConditions(1).Interior.ColorIndex
par contre s'il y a plus d'une condition
il faut les inclure dans la macro ce qui oblige à vérifier chaque formule en vba
tu verras ce qui arrive à B1:B10 en mettant comme conditions pour la cellule A1 :
=1 rouge
=2 vert
=3 bleu
If Range("A1") = Range("A1").FormatConditions(1).Formula1 Then
Range("B1:B10").Interior.ColorIndex = _
Range("A1").FormatConditions(1).Interior.ColorIndex
ElseIf Range("A1") = Range("A1").FormatConditions(2).Formula1 Then
Range("B1:B10").Interior.ColorIndex = _
Range("A1").FormatConditions(2).Interior.ColorIndex
ElseIf Range("A1") = Range("A1").FormatConditions(3).Formula1 Then
Range("B1:B10").Interior.ColorIndex = _
Range("A1").FormatConditions(3).Interior.ColorIndex
Else
Range("B1:B10").Interior.ColorIndex = Range("A1").Interior.ColorIndex
End If
isabelle, (N°497)
Je voudrais que la cellule A1 s'affiche en rouge lorsqu'elle contient un fruit appartenant à
une liste de plus de 30 fruits. Comment faire ?
Tu mets la liste de tes noms pomme poire pêche abricot n'importe où
dans le classeur, ça peut être sur une feuille cachée et tu nommes cette
plage.
pour le format conditionnel tu mets la formule : est égal à :
=EQUIV(A1;plage;0)
dans le classeur, ça peut être sur une feuille cachée et tu nommes cette
plage.
pour le format conditionnel tu mets la formule : est égal à :
=EQUIV(A1;plage;0)
Isabelle, (N°496)