Change Event Example
This example changes the color of changed cells to blue.
Private Sub Worksheet_Change(ByVal Target as Range) Target.Font.ColorIndex = 5 End Sub