Changer la couleur de la cellule sélectionner

Bonjour

dans ma Feuil1 j'utilise uniquement les cellule de la plage "EST"

Est=Feuil1!$B$4;Feuil1!$B$5;Feuil1!$B$9;Feuil1!$B$12;Feuil1!$B$14;Feuil1!$C$6;Feuil1!$C$7;Feuil1!$C$8;Feuil1!$C$10;Feuil1!$C$11;Feuil1!$C$13;Feuil1!$D$4;Feuil1!$D$14

et cette plage seras sélectionner automatiquement après le changement de la cellule "B2" pour ca voici mon code utiliser

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> Range("B2").Address Then Exit Sub
Range("est").Select
End Sub

je souhaite changer la couleur de la cellule sélectionner dans plage "EST" et tous les cellule a gauche de la même ligne

j'ai utiliser le code suivant

Private Sub Worksheet_selectionChange(ByVal Target As Range)
ActiveSheet.Cells.Interior.ColorIndex = 0
Range(ActiveCell, ActiveCell.End(xlToLeft).End(xlToLeft)).Interior.ColorIndex = 4
End Sub

mais lorsque j'ai fusionné les deux code ça marche pas

Aider moi svp

Bonsoir,

Il s'agit de deux évènements distincts, il n'y a pas lieu de les fusionner !

Bonjour,

Bonjour MFerrand,

Pour information, Multiposte !...

Cdlt.

Merci Jean-Eric !

Bonne journée.

Bonjour,

Bonjour MFerrand,

Pour information, Multiposte !...

Cdlt.

Multiposte ! ou est le problème

Aucun pour moi !

Je ne perds juste pas mon temps à travailler sur le sujet.

Cordialement.

Rechercher des sujets similaires à "changer couleur selectionner"