Colorié une cellule

[laurent]

Bonjours à tous,

Voici mon petit problème,

En inscrivant une donnée dans une cellule, je souhaiterais qu'elle change de couleur suivant 6 critères

Comment pourrais-je procéder


Salut

laurent

 

[Dan]

Bonjour,

Tu peux utiliser la mise en forme conditionnelle que tu trouves dans menu Format. Celle - ci ne t'offre que 3 possibilités au lieu des 6 que tu souhaites.
Mais il y a peut-être d'autres solutions qui peuvent être envisagées. En cas d'intérêt je te propose de nous envoyer un fichier (zippé!) exemple.

@+

Dan

 

[Marcel]

un jour j'ai récupéré ce fichier sur ce forum de david et/ou christophe... qui répond à ta demande... tu inscrits S1, S2 S3...(voir le VBA...)

 

[laurent]

Ci-joint un fichier exemple zippé

Voici mon problème, quand je tape, par exemple nantes sur une cellule fusionnée de mon tableau, je voudrais que c'elle ci change de couleur


J'ai reçu un exemple en VBA, qui me parais très bien mais sur des cellues fusionnées, il m'affiche un message d'erreur

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("b7:cn57")) Is Nothing Then 'modifie la plage
Select Case Target ' tu peux ajouter des Case sans problème
Case "NANTES"
Target.Interior.ColorIndex = 33
Case "LA ROCHE"
Target.Interior.ColorIndex = 35
Case "ST NAZAIRE"
Target.Interior.ColorIndex = 3
Case "LE MANS"
Target.Interior.ColorIndex = 36
Case "ANGERS"
Target.Interior.ColorIndex = xlNone
Case ""
Target.Interior.ColorIndex = xlNone
End Select
End If

End Sub

Merci pour Tout

@ +

Laurent

 

[laurent]

Encore Merci pour cette exemple

@+

Laurent

 

[Sylvain]

bonjour,

pour éviter tout problème tu peux éviter de fusionner les cellules en utilisant le format centré sur plusieurs colonnes ce qui fait le même affichage.

format de cellule, alignement horizontal.

A+

 

[laurent]

merci pour ce renseignement, mais cette méthode de fonctionne pas pour mon cas, car je souhaiterais que cinq cellules fusionnées ou centré sur plusieurs colonnes soit colorier

encore merci

@ +

Laurent