+ de MFC

[Martial]

Bonjour à toutes et tous

je souhaite changer la couleur de fond d'une ligne selon la valeur d'une cellule.

Mais je souhaite avoir + de trois mises en formes conditionnelles.


J'ai bien trouvé le classeur : mDF_MFCmultiples_v2.xls, mais à priori,on ne peut mettre une MFC que sur une seule cellule et non pas une ligne.

Alors......
Peut on par exemple :

Ma cellule H9 = 'Soldé'
MFC sur cellules 'A9-H9' = Fond vert.

Merci par avance pour votre aide.
Martial

 

[PascalXLD]

Bonjour

Si tu veux plus de 3 mises en forme il faudra passer par une macro

 

[PascalXLD]

Re

Tiens un exemple en pièce jointe [file name=Classeur1_20051123160033.zip size=7505]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20051123160033.zip[/file]

 

[Martial]

Re

Grand merci Pascal, sympa de ta part.
Tout à fait ce qu'il me fallait.

 

[Exfan]

oui mais,
dans mon cas (cf mon post sur couleur en cellule)
je voudrais cela sur chaque cellule de la colonne et pas sur la cellule untelle...
je n'y arrive pas vraiment...et Intersect je ne connaissais pas...je vais regarder cela

en tout cas merci.

 

[Martial]

Bonjour à toutes et tous

Comme dit dans mon autre post, ça fonctionne parfaitement.
Par contre, souhaitant adapter ce code à un tableau de 36 lignes,
faut il :
Que je répète ce code 36 fois (1 fois par ligne), ou y'a t'il moyen de simplifier cette manip.

Par avance, merci pour vos info.

If Not Intersect(Target, Range('H9')) Is Nothing Then
Select Case Target.Value
Case 'En cours'
Macouleur = 46
Case 'En attente'
Macouleur = 40
Case 'Soldé'
Macouleur = 35
Case 'Déplacé'
Macouleur = 36
Case 'Annulé'
Macouleur = 37
Case 'Pour info'
Macouleur = 34
Case Else
Macouleur = -4142
End Select
Range('A9:H9').Interior.ColorIndex = Macouleur
End If
End Sub [file name=Test_20051124080218.zip size=10220]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Test_20051124080218.zip[/file]

 

[PascalXLD]

Bonjour

Le voilà modifié

[file name=Test_20051124082605.zip size=10569]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Test_20051124082605.zip[/file]

 

[Martial]

Re

Génial !

Encore merci Pascal et bonne journée.


Martial

 

[_Thierry]

Bonjour Pascal, Martial, le Forum

Juste en passant vite fait pour vous faire un coucou et aussi pour signaler qu'au lieu de retenir '-4142', il est plus lisible d'utiliser les constantes prévues par VBA : 'xlColorIndexNone' et même encore plus simplement 'xlNone'.

Bonne Journée
[ol]@+Thierry[/ol]

 

[PascalXLD]

SAlut Thierry

ça fait plaisir de te croiser

Sinon c'est parceque j'avais déclaré une variable pour les couleurs et donc entre les nombres et le xlnone .....