Discussion :

[Miss721]

Bonjour,
J'ai cette formule :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=SI((C48+D48+E48+F48+G48)=H50;H50;"DOMMAGE")

Je souhaiterais que "Dommage" soit en rouge sans passer par une MFC
Merci et bonne journée

[Marc-L]

Bonjour,

et non, c'est soit la cellule en rouge peu importe son contenu soit c'est via une MFC !

[Haache]

Tu es obligé d'utiliser les mises en formes conditionnelles

[QuestVba]

Bonjour,

Effectivement avec une MFC c'est simple.

Mais tu pourrais essayer de changer le module suivant. Chaque fois que j'encode le fameux mot 'developpez', excel me le met en rouge (qu'il soit seul dans la cellule ou entre deux autres mots).
Le code réagit au changement dans la feuille.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Option Explicit
 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If LCase(Target.Value) Like "*developpez*" Then
    With Target.Characters(InStr(Target, "developpez"), 10).Font
        .ColorIndex = 3
        .Bold = True
    End With
End If
End Sub

[Haache]

Tu peux essayer le code de Mr Lionel. Il a contourné le problème avec un fameux code. Félicitation !!!!!

Mais à vrai dire, je n'ai pas compris aussi . Pouvez vous expliquer un peu? On met ce code où dans excel? est ce dans une cellule?

[Menhir]

Je ne vois pas très bien quelles raisons pourraient inciter à préférer un tel code à une MFC ?

[QuestVba]

Normalement, la MFC s'appliquera à tout le contenu alors que le code ne mettra en rouge que le mot choisi (s'il se trouve dans une phrase par ex.).

[Marc-L]

Exact ! Et dans ce cas, pas d'autre choix que le VBA …

[papouclo]

Bonjour,
Une autre solution avec la formule utilisée par Miss721 pour ne pas passer par une MFC (c'est le désir exprimé) ni par du VBA.
Demander pour la cellule le format personnalisé :
0;-0;0;[Rouge]@
Cordialement
Claude

[Marc-L]

Bien vu !

Et m...e, c'est le B-A-BA d'Excel ‼

[QuestVba]

Excellent papouclo !

Mais alors tout sera en rouge, non ? Que ce soit dommage ou l'autre résultat.

[papouclo]

Re,
D'après la formule le résultat est soit le texte "Dommage" et alors il sera de couleur rouge, soit numérique et dans ce cas, il sera noir (ou de la couleur du format de base).
Bonsoir à tous.
Claude

[Haache]

Ah oui!!!! papouclo a raison. Ce code permet d'afficher soit un texte écrit en rouge ou texte en noir.

[papouclo]

Bonjour,

Ce code permet d'afficher soit un texte écrit en rouge ou texte en noir.

Avec le code personnalisé proposé, du texte (chaîne de caractères alphanumérique) sera toujours en rouge; tout ce qui sera interprété par Excel comme un nombre
sera en noir.
Cordialement
Claude

[Haache]

Bonjour,Avec le code personnalisé proposé, du texte (chaîne de caractères alphanumérique) sera toujours en rouge; tout ce qui sera interprété par Excel comme un nombresera en noir.CordialementClaude

Autant pour moi!! On dit les même choses. Les aphanumériques seront en rouge et les numériques en noir.

[Miss721]

Bonjour,
Super ta formule, Papouclo, merci mais puis je garder le format comptable pour le résultat numérique ?

[papouclo]

Bonjour,
Plutôt que donner seulement un format personnalisé qui convient :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

_-* # ##0,00\ [$€-40C]_-;-* # ##0,00\ [$€-40C]_-;_-* "-"??\ [$€-40C]_-;[ROUGE]_-@_-

je préfère indiquer en plus comment on peut le trouver.
Sélectionner une cellule quelconque et demander dans l'onglet Accueil le format Comptabilité.
Puis, toujours avec cette cellule sélectionnée, aller dans la fenêtre des formats et demander "autre formats numériques"
et dans la liste obtenue choisir "personnalisée"
On obtient dans la case Type le format correspondant à Comptabilité :
_-* # ##0,00 €_-;-* # ##0,00 €_-;_-* "-"?? €_-;_-@_-
Placer le curseur après le dernier point virgule juste avant le format dédié au texte _-@_- et entrer [ROUGE].
On obtient le format désiré avec toutes les données numériques au format comptabilité en noir et les textes en rouge.
Cordialement
Claude

[Miss721]

Bonjour,
Cool, merci pour ces formules.
Bonne journée