Surlignage ligne selon condition en VBA

re,

je viens de faire fonctionner ton code !

je ne comprends pas pourquoi, il ne fonctionne que si je le copie et le colle dans mon 1er fichier

on vient de m'annoncer que le type de tableau serait plutôt celui de l'exemple que je joint !:( grrrrr !!

puis je te demander un dernier coup de main, sans vouloir abuser ?

Je suis navré, chez moi (Excel 2007) il fonctionne.

Une petite correction :

Au lieu de :

Else

    Range("A" & R.Row & ":D" & R.Row & ",F" & R.Row & ":L" & R.Row&).Interior.ColorIndex = 3

Lire :

Else

    Range("A" & R.Row & ":D" & R.Row & ",F" & R.Row & ":L" & R.Row).Interior.ColorIndex = 3

Sinon, je ne vois pas pourquoi elle ne marche pas...

essayez ceci :

Set R = Columns(1).Find(Me.ComboBox1.Value, LookAt:=xlWhole)

au lieu de

Set R = Columns(1).Find(Me.ComboBox1.Value,, xlValues, xlWhole)

@ bientôt

LouReeD

re,

avec ces modifs de code, la coloration des 2 1ères lignes se fait jusqu'en cellule 12 et ne s'efface pas

vous pouvez m'envoyer votre fichier ?

oui, bien sur, le voici

Et oui bien sûr, il y a trois lignes avec des zones plus petites....

@ bientôt

LouReeD

ça y est ! .tout est ok !

merci pour ta patience, ça fonctionne nickel.

reste maintenant à l'appliquer sur mon fichier en essayant de comprendre toutes tes lignes de code!

encore merci et à+

fichier avec explications... Mouais faut voir si j'ai réussi à me faire comprendre

@ bientôt

LouReeD

merci pour ton boulot et ton temps passé là dessus

à+