format conditionnel

  • Initiateur de la discussion Philippe
  • Date de début
P

Philippe

Guest
Bonjour à tous,

J'ai appliqué a des cellules un format conditionnel de couleurs (vert pour +,bleu pour = ,et rouge pour -) mais je voudrais que d'autres cellules (texte) se mettent de la même couleur automatiquement.

Est -ce possible ?
 
M

mca

Guest
La semaine dernière j'ai appel au forum pour avoir des infos sur le même sujet. Voici un extrait de ce que j'ai écrit comme macro.

Sub MiseEnForme()
ActiveSheet.UsedRange.Select 'Sélectionne la feuille courante
For Each c In Selection 'Pour chaque cellule
Valeur = UCase(c) 'Convertit en majuscule la saisie dans la cellule
Select Case Valeur
Case Is = "S1" 'si la valeur dans la cellule égale "S1"
c.Interior.ColorIndex = 3 'Trame de fond colorée en rouge
Case Is = "S2"
c.Interior.ColorIndex = 4 'Couleur des caractères en vert pomme
End Select
Next 'Cellule suivante
End Sub

J'espère que cela pourra t'aider.
Bon courage
 
D

DJN90

Guest
Bonjour Philippe,

J'espère avoir bien compris ta demande mais c'est possible.

Par exemple si ta cellule A1 contient le signe + (vert) tu cliques sur la cellule texte puis menu -> format -> mise en forme condition.."
Là tu choisis la condition "la formule est" et dans la rubrique tu encodes par exemple : =$A1="+"; puis tu définis le format à adopter; ici vert.

Espérant avoir répondu à ta question.

Bon appétit

@+ Dan
 

Discussions similaires

Statistiques des forums

Discussions
314 655
Messages
2 111 604
Membres
111 217
dernier inscrit
aladinkabeya2