Change a cells fill color. VBA to make another cell the same color and also changes.

A coworker has asked me:
If I make A1 a red fill, can I have E1 also change to red automatically, (or to whatever color A1 gets changed to?)

I have no idea.


A1 fill color is not dependent on it's value, or on another cells value. . .

Anyone have some code that can do this?

TIA.

Pete

walruseggman:

This works for us. Thank you for your expertise and grey matter exercise.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[E1].Interior.Color = [A1].Interior.Color
[E2].Interior.Color = [A2].Interior.Color
[J18].Interior.Color = [A18].Interior.Color
End Sub

Pete