Mise en forme

Bonjour,

Je cherche à faire une mise en forme de la cellule A1 selon si la valeur contenue en A1 se trouve dans la zone B1:B10, une autre mise en forme si cette valeur de A1 se trouve dans C1:C10...ect

Merci par avance pour vos remarques.

Edvitch

Bonjour

Un essai à tester. Te convient-il ?

Bye !

14essai-1.xlsm (16.63 Ko)
5edvitch.xlsx (10.32 Ko)

Ou alors avec les MFC (mise en forme conditionnelle), s'il n'ay pas pas trop de cas différents...

A+ Daniel

Bonjour GMB et Daniel,

@ gmb : Le fichier bloquait au début en disant qu'il y avait des pb de variable....mais maintenant il fonctionne et ca me plait.

Par contre je souhaiterai appliquer cette idée dans un cas concret dans un classeur...mais je maitrise mal les macros.

Peux-tu m'expliquer chaque ligne de code afin de je puisse l'adapter à mon cas?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    For col = 2 To 10
        n = Choose(col, 2, 9, 15, 19, 21, 24, 35, 37, 39, 40)
        Set cell = Range(Cells(1, col), Cells(10, col)).Find(Range("A1"), lookat:=xlWhole)
        If Not cell Is Nothing Then
            Range("A1").Interior.ColorIndex = n
        End If

    Next col
End Sub

Je te remercie.

@ Daniel : j'ai effectivement trop de cas différents, merci quand même Daniel.

A bientôt.

Voilà :

8essai-1b.xlsm (17.63 Ko)

Pour le détail des fonctions, je t'invite à cliquer dessus, dans la macro, puis sur la touche F1 et tu auras toutes les explications.

Bye !

Ok,

Merci pour l'info.

A bientôt

Rechercher des sujets similaires à "mise forme"