Probleme MFC

jeanpierre

Nous a quitté

Repose en paix

• 25 Janvier 2010

• #2

Re : Probleme MFC

Bonjour cpeens,

Pas sûr d'avoir bien compris, mais si tu mets dans ta MFC, en B8 :

=ET(E8<10;E8<>"")

Est-ce que cela répond à ta question ?

Bonne journée.

Jean-Pierre

 

Vote positif 0 Vote négatif

C

cpeens

XLDnaute Occasionnel

• 25 Janvier 2010

• #3

Re : Probleme MFC

Bonjour et merci pour ton aide mais je me suis mal fais comprendre


j'ai une macro qui me permet de copier dans la Feuil2 la valeur si une cellule de la colonne B devien rouge et sa marche trés bien.

mais ce que je souhaite c'est de colorier cette cellule en rouge par MFC du style si =E9<10 format rouge sa aussi sa fonctionne sauf en utilisant cette methode ma macro ne fonctionne plus comprend tu elle ne copie plus dans ma feuil2 la valeur.

 

Pièces jointes

• cpeens-1.xls

  27.5 KB · Affichages: 30
• cpeens-1.xls

  27.5 KB · Affichages: 30
• cpeens-1.xls

  27.5 KB · Affichages: 33

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 25 Janvier 2010

• #4

Re : Probleme MFC

Bonjour,

Parce que la couleur mise par la MFC n'a pas le même code que celui de la couleur standard correspondante.

Dans une feuille mets la cellule B9 en Jaune 6 par ex. et la cellule B10 avec une MFC et le "même" jaune et dans un sub, écris

MsgBox Range("B9").Interior.ColorIndex
MsgBox Range("B10").Interior.ColorIndex

et lance...tu auras 6 la première fois et -4142 la seconde (et cela quelle que soit la couleur choisie...)

Donc dans ton cas, tu ne détectes pas la couleur voulue... et je ne connais pas la solution 😡

cordialement

 

Vote positif 0 Vote négatif

C

cpeens

XLDnaute Occasionnel

• 25 Janvier 2010

• #5

Re : Probleme MFC

merci j'ai trouver un fil qui parle de mon soucis mais je pige pas tout

Code:

La MEFC modifie l'apparence des cellules mais pas leurs propriétés !

Solution : remplacer
If c.Interior.ColorIndex = 4 Then
par la condition utilisée dans la MEFC.

je sais pas ou le mettre du tout quelqu'un aurais une idée merci

 

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 25 Janvier 2010

• #6

Re : Probleme MFC

Comme je te l'ai dit, je ne crois pas qu'il y ait de solution directe ; il faut donc, mettre dans le code, à la place de ta condition "si couleur cellule = xx ..." la condition que tu mettais dans la MFC pour obtenir cette couleur dans la cellule.

C'est ce qu'il veulent dire dans ce que tu as trouvé.

Cordialement

 

Vote positif 0 Vote négatif

C

cpeens

XLDnaute Occasionnel

• 25 Janvier 2010

• #7

Re : Probleme MFC

lol dsl mais je comprend pas vraiment dois je mettre ceci dans la mfc en passant par format mise en forme conditionelle?

 

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 25 Janvier 2010

• #8

Re : Probleme MFC

Il faut laisser les MFC pour avoir tes couleurs mais, par ex. à la place de :

Code:

If Cells(NBLigne, 2).Interior.ColorIndex = 3 Then

il faudrait mettre :

Code:

If Cells(NBLigne, 5).Value >10 Then

et à la place de :

Code:

If Cells(NBLigne, 2).Interior.ColorIndex = 6 Then

il faudrait mettre :

Code:

If Cells(NBLigne, 5).Value <10 Then

et à la place de (enfin...je suppose car la couleur 8 n'est pas traitée dans la MFC) :

Code:

If Cells(NBLigne, 2).Interior.ColorIndex = 8 Then

il faudrait mettre :

Code:

If Cells(NBLigne, 5).Value =10 Then

Cependant, il doit y avoir un autre problème car sans rien toucher d'autre mais en supprimant les MFC et en mettant des cellules coloriées "normalement à la main" je n'ai pas réussi à faire fonctionner ton code...il faudrait regarder cela de plus près...

Coirdialement

 

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 25 Janvier 2010

• #9

Re : Probleme MFC

Cependant, il doit y avoir un autre problème car sans rien toucher d'autre mais en supprimant les MFC et en mettant des cellules coloriées "normalement à la main" je n'ai pas réussi à faire fonctionner ton code...il faudrait regarder cela de plus près...

Cliquez pour agrandir...

Je n'ai rien dit! Je n'avais pas vu que l'écriture se faisait dans la feuille2 😡 🙁

Donc avec ce que je t'ai dit, cela fonctionne...

Cordialement

 

Vote positif 0 Vote négatif