Quand je type dans la cellule I, j'ai automatiquement le résultat selon labelle dans la colonne J
J'aimerais que si je transforme le résultat en remplissant par-dessus la cellule de la colonne J que le résultat que j'ai typé apparaisse en rouge gras.
Et cela pour toutes les colonnes "J L N" et toutes les feuilles
Merci d’avance pour votre réponse et bonne journée
La solution précédente par MFC est une bonne solution.
Mais si l'on modifie la formule en colonnes J, L, N, la MFC n'agit pas.
Pour cela il faut comparer les formules en utilisant cette fonction VBA :
VB:
Function MFC(cel As Range)
Select Case cel.Column
Case 10: MFC = cel.FormulaR1C1 <> "=IFERROR(LOOKUP(RC[-1],R38C[-1]:R43C),"""")"
Case 12: MFC = cel.FormulaR1C1 <> "=IFERROR(LOOKUP(RC[-1],R38C[-3]:R43C[-1]),"""")"
Case 14: MFC = cel.FormulaR1C1 <> "=IFERROR(LOOKUP(RC[-1],R38C[-5]:R43C[-2]),"""")"
End Select
End Function
Formule de la MFC =MFC(J4)
La MFC colore la cellule en jaune.
Edit : j'ai créé cette MFC sur toutes les feuilles.
La solution précédente par MFC est une bonne solution.
Mais si l'on modifie la formule en colonnes J, L, N, la MFC n'agit pas.
Pour cela il faut comparer les formules en utilisant cette fonction VBA :
VB:
Function MFC(cel As Range)
Select Case cel.Column
Case 10: MFC = cel.FormulaR1C1 <> "=IFERROR(LOOKUP(RC[-1],R38C[-1]:R43C),"""")"
Case 12: MFC = cel.FormulaR1C1 <> "=IFERROR(LOOKUP(RC[-1],R38C[-3]:R43C[-1]),"""")"
Case 14: MFC = cel.FormulaR1C1 <> "=IFERROR(LOOKUP(RC[-1],R38C[-5]:R43C[-2]),"""")"
End Select
End Function
Formule de la MFC =MFC(J4)
La MFC colore la cellule en jaune.
Edit : j'ai créé cette MFC sur toutes les feuilles.