XL 2021 Modification d'une cellule calculée

[clausen]

Dans le fichier joint, j'aimerais :

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

 

[clausen]

Bonsour®
avez vous au moins testé la MFC proposée concernant uniquement le changement de contenu(formule ou saisie) de la plage J4:J34

oui mais ça marche pas

 

[Modeste geedee]

Bonsour®
avez vous au moins testé la MFC proposée concernant uniquement le changement de contenu(formule ou saisie) de la plage J4:J34

oui mais ça marche pas

???

 

[clausen]

???

Super ça a l'air de fonctionner. J'aimerais modifier le fond garder un fond blanc et écriture en rouge Gras

 

[Dranreb]

Joignez ce que vous avez essayé, que je puisse vous dire pourquoi ça ne marche pas.

 

[Modeste geedee]

Super ça a l'air de fonctionner. J'aimerais modifier le fond garder un fond blanc et écriture en rouge Gras

Bonsour®
si la cellule devient vide ou espace l'ecriture blanche ne permet pas de voir n'intervention

 

[clausen]

Bonsour®
si la cellule devient vide ou espace l'ecriture blanche ne permet pas de voir n'intervention
Regarde la pièce jointe 1188347

Super ça fonctionne parfaitement. Ou se trouve le code que vous avez écrit. je veux enlever le soulignement
Merci encore mille fois c'est suppert

 

[clausen]

Super ça fonctionne parfaitement. Ou se trouve le code que vous avez écrit. je veux enlever le soulignement
Merci encore mille fois c'est suppert

J'ai trouvé tout seul pour supprimer le soulignement Merci encore

 

[Modeste geedee]

Super ça fonctionne parfaitement. Ou se trouve le code que vous avez écrit. je veux enlever le soulignement
Merci encore mille fois c'est suppert

il n'y a aucun code ni VBA, ni formule définie dans le gestionnaire de Noms

voir les mises en forme conditionnelles !


si l'on enleve le soulignement plus rien ne permet d'identifier la suppression de la formule ou possibilité de retour arrière

 

[clausen]

il n'y a aucun code ni VBA, ni formule définie dans le gestionnaire de Noms

voir les mises en forme conditionnelles !


si l'on enleve le soulignement plus rien ne permet d'identifier la suppression de la formule ou possibilité de retour arrière

Merci pour le renseignement et bon weekend

 

[job75]

Bonjour clausen, le forum,

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 :

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.

A+

 

[clausen]

Bonjour clausen, le forum,

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 :

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.

A+

Super ça marche aussi Merci à tout le monde