XL 2016 Changer la couleur de la cellule sélectionner

[iliess]

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