Mise en forme conditionnelle,automatique et avec des 8 conditions

[GS82]

Salut les Xldiens et les Xldiennes
en fait j'ai 4 colonnes renfermées dans un grand tableau
les cellules de ces colonnes peuvent prendre des valeurs bien precise(8 valeurs seulement)
je cherche à ce que dés que je tape une valeur dans une de ces cellules, la cellule prend automatiquement une couleur precise,
bien evidemment a chauqe valeur une couleur

cad que je cherche a ce que ces cellule fonctionnnent exactenement
comme si elle avaient une mise en forme conditionnelle mais que au lieu qu'on dispose seulement de 3 conditions, on a 8.
j'arrive pas a trouver le truc, merci pour votre coup de main

 

[GS82]

Re : Mise en forme conditionnelle,automatique et avec des 8 conditions

help pleaz

 

[GS82]

Re : Mise en forme conditionnelle,automatique et avec des 8 conditions

help pleaz Merci

 

[abc]

Re : Mise en forme conditionnelle,automatique et avec des 8 conditions

Bonsoir,
un code du forum a adapter à ton fichier
Private Sub Worksheet_Change(ByVal zz As Range)
If Intersect(zz, [A1:C10]) Is Nothing Then Exit Sub
Select Case zz
Case "1": zz.Interior.ColorIndex = 4
Case "2": zz.Interior.ColorIndex = 33
Case "3": zz.Interior.ColorIndex = 35
'etc.......
Case Else: zz.Interior.ColorIndex = xlNone
End Select
End Sub
A +

 

[GS82]

Re : Mise en forme conditionnelle,automatique et avec des 8 conditions

salut abc et merci pour votre réponse
je vois
je coince tjrs sur des petits detail !!
je vous remerci infiniment abc, mon problème est resolu
bonne nuit

 

[GS82]

Re : Mise en forme conditionnelle,automatique et avec des 8 conditions

en fait

If Intersect(zz, [G16:j45]) Is Nothing Then Exit Sub

signifie quoi au juste?

 

[GS82]

Re : Mise en forme conditionnelle,automatique et avec des 8 conditions

Intersect?

 

[abc]

Re : Mise en forme conditionnelle,automatique et avec des 8 conditions

Bonsoir,
La traduction est se croise.

A +